
(FPCore (x y z t) :precision binary64 (/ (* x (- y z)) (- t z)))
double code(double x, double y, double z, double t) {
return (x * (y - z)) / (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 - z)) / (t - z)
end function
public static double code(double x, double y, double z, double t) {
return (x * (y - z)) / (t - z);
}
def code(x, y, z, t): return (x * (y - z)) / (t - z)
function code(x, y, z, t) return Float64(Float64(x * Float64(y - z)) / Float64(t - z)) end
function tmp = code(x, y, z, t) tmp = (x * (y - z)) / (t - z); end
code[x_, y_, z_, t_] := N[(N[(x * N[(y - z), $MachinePrecision]), $MachinePrecision] / N[(t - z), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{x \cdot \left(y - z\right)}{t - z}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 12 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t) :precision binary64 (/ (* x (- y z)) (- t z)))
double code(double x, double y, double z, double t) {
return (x * (y - z)) / (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 - z)) / (t - z)
end function
public static double code(double x, double y, double z, double t) {
return (x * (y - z)) / (t - z);
}
def code(x, y, z, t): return (x * (y - z)) / (t - z)
function code(x, y, z, t) return Float64(Float64(x * Float64(y - z)) / Float64(t - z)) end
function tmp = code(x, y, z, t) tmp = (x * (y - z)) / (t - z); end
code[x_, y_, z_, t_] := N[(N[(x * N[(y - z), $MachinePrecision]), $MachinePrecision] / N[(t - z), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{x \cdot \left(y - z\right)}{t - z}
\end{array}
(FPCore (x y z t) :precision binary64 (* x (/ (- y z) (- t z))))
double code(double x, double y, double z, double t) {
return x * ((y - z) / (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 - z) / (t - z))
end function
public static double code(double x, double y, double z, double t) {
return x * ((y - z) / (t - z));
}
def code(x, y, z, t): return x * ((y - z) / (t - z))
function code(x, y, z, t) return Float64(x * Float64(Float64(y - z) / Float64(t - z))) end
function tmp = code(x, y, z, t) tmp = x * ((y - z) / (t - z)); end
code[x_, y_, z_, t_] := N[(x * N[(N[(y - z), $MachinePrecision] / N[(t - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x \cdot \frac{y - z}{t - z}
\end{array}
Initial program 88.3%
associate-/l*96.6%
Simplified96.6%
Final simplification96.6%
(FPCore (x y z t)
:precision binary64
(if (or (<= z -7.2e-6)
(and (not (<= z -7.5e-74)) (or (<= z -1.7e-92) (not (<= z 2.8e-21)))))
(* x (- 1.0 (/ y z)))
(/ (* x y) t)))
double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -7.2e-6) || (!(z <= -7.5e-74) && ((z <= -1.7e-92) || !(z <= 2.8e-21)))) {
tmp = x * (1.0 - (y / z));
} else {
tmp = (x * y) / t;
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if ((z <= (-7.2d-6)) .or. (.not. (z <= (-7.5d-74))) .and. (z <= (-1.7d-92)) .or. (.not. (z <= 2.8d-21))) then
tmp = x * (1.0d0 - (y / z))
else
tmp = (x * y) / t
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -7.2e-6) || (!(z <= -7.5e-74) && ((z <= -1.7e-92) || !(z <= 2.8e-21)))) {
tmp = x * (1.0 - (y / z));
} else {
tmp = (x * y) / t;
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if (z <= -7.2e-6) or (not (z <= -7.5e-74) and ((z <= -1.7e-92) or not (z <= 2.8e-21))): tmp = x * (1.0 - (y / z)) else: tmp = (x * y) / t return tmp
function code(x, y, z, t) tmp = 0.0 if ((z <= -7.2e-6) || (!(z <= -7.5e-74) && ((z <= -1.7e-92) || !(z <= 2.8e-21)))) tmp = Float64(x * Float64(1.0 - Float64(y / z))); else tmp = Float64(Float64(x * y) / t); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if ((z <= -7.2e-6) || (~((z <= -7.5e-74)) && ((z <= -1.7e-92) || ~((z <= 2.8e-21))))) tmp = x * (1.0 - (y / z)); else tmp = (x * y) / t; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[z, -7.2e-6], And[N[Not[LessEqual[z, -7.5e-74]], $MachinePrecision], Or[LessEqual[z, -1.7e-92], N[Not[LessEqual[z, 2.8e-21]], $MachinePrecision]]]], N[(x * N[(1.0 - N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(x * y), $MachinePrecision] / t), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -7.2 \cdot 10^{-6} \lor \neg \left(z \leq -7.5 \cdot 10^{-74}\right) \land \left(z \leq -1.7 \cdot 10^{-92} \lor \neg \left(z \leq 2.8 \cdot 10^{-21}\right)\right):\\
\;\;\;\;x \cdot \left(1 - \frac{y}{z}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{x \cdot y}{t}\\
\end{array}
\end{array}
if z < -7.19999999999999967e-6 or -7.5e-74 < z < -1.7000000000000001e-92 or 2.80000000000000004e-21 < z Initial program 78.9%
associate-/l*99.2%
Simplified99.2%
Taylor expanded in t around 0 63.4%
mul-1-neg63.4%
associate-/l*82.0%
distribute-rgt-neg-in82.0%
distribute-frac-neg82.0%
neg-sub082.0%
associate--r-82.0%
neg-sub082.0%
+-commutative82.0%
sub-neg82.0%
div-sub82.0%
*-inverses82.0%
Simplified82.0%
if -7.19999999999999967e-6 < z < -7.5e-74 or -1.7000000000000001e-92 < z < 2.80000000000000004e-21Initial program 96.7%
associate-/l*94.3%
Simplified94.3%
Taylor expanded in z around 0 66.6%
Final simplification73.8%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (* x (- 1.0 (/ y z)))))
(if (<= z -2.4e+41)
t_1
(if (<= z 9.2e-98)
(* x (/ y (- t z)))
(if (<= z 2.2e+55) (* x (/ z (- z t))) t_1)))))
double code(double x, double y, double z, double t) {
double t_1 = x * (1.0 - (y / z));
double tmp;
if (z <= -2.4e+41) {
tmp = t_1;
} else if (z <= 9.2e-98) {
tmp = x * (y / (t - z));
} else if (z <= 2.2e+55) {
tmp = x * (z / (z - t));
} else {
tmp = t_1;
}
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) :: tmp
t_1 = x * (1.0d0 - (y / z))
if (z <= (-2.4d+41)) then
tmp = t_1
else if (z <= 9.2d-98) then
tmp = x * (y / (t - z))
else if (z <= 2.2d+55) then
tmp = x * (z / (z - t))
else
tmp = t_1
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double t_1 = x * (1.0 - (y / z));
double tmp;
if (z <= -2.4e+41) {
tmp = t_1;
} else if (z <= 9.2e-98) {
tmp = x * (y / (t - z));
} else if (z <= 2.2e+55) {
tmp = x * (z / (z - t));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t): t_1 = x * (1.0 - (y / z)) tmp = 0 if z <= -2.4e+41: tmp = t_1 elif z <= 9.2e-98: tmp = x * (y / (t - z)) elif z <= 2.2e+55: tmp = x * (z / (z - t)) else: tmp = t_1 return tmp
function code(x, y, z, t) t_1 = Float64(x * Float64(1.0 - Float64(y / z))) tmp = 0.0 if (z <= -2.4e+41) tmp = t_1; elseif (z <= 9.2e-98) tmp = Float64(x * Float64(y / Float64(t - z))); elseif (z <= 2.2e+55) tmp = Float64(x * Float64(z / Float64(z - t))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t) t_1 = x * (1.0 - (y / z)); tmp = 0.0; if (z <= -2.4e+41) tmp = t_1; elseif (z <= 9.2e-98) tmp = x * (y / (t - z)); elseif (z <= 2.2e+55) tmp = x * (z / (z - t)); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(x * N[(1.0 - N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -2.4e+41], t$95$1, If[LessEqual[z, 9.2e-98], N[(x * N[(y / N[(t - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 2.2e+55], N[(x * N[(z / N[(z - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x \cdot \left(1 - \frac{y}{z}\right)\\
\mathbf{if}\;z \leq -2.4 \cdot 10^{+41}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;z \leq 9.2 \cdot 10^{-98}:\\
\;\;\;\;x \cdot \frac{y}{t - z}\\
\mathbf{elif}\;z \leq 2.2 \cdot 10^{+55}:\\
\;\;\;\;x \cdot \frac{z}{z - t}\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if z < -2.4000000000000002e41 or 2.2000000000000001e55 < z Initial program 72.5%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 63.8%
mul-1-neg63.8%
associate-/l*88.1%
distribute-rgt-neg-in88.1%
distribute-frac-neg88.1%
neg-sub088.1%
associate--r-88.1%
neg-sub088.1%
+-commutative88.1%
sub-neg88.1%
div-sub88.1%
*-inverses88.1%
Simplified88.1%
if -2.4000000000000002e41 < z < 9.20000000000000002e-98Initial program 96.5%
associate-/l*93.6%
Simplified93.6%
Taylor expanded in y around inf 80.8%
associate-/l*78.4%
Simplified78.4%
if 9.20000000000000002e-98 < z < 2.2000000000000001e55Initial program 99.9%
associate-/l*99.7%
Simplified99.7%
Taylor expanded in y around 0 66.9%
mul-1-neg66.9%
distribute-neg-frac266.9%
neg-sub066.9%
associate--r-66.9%
neg-sub066.9%
+-commutative66.9%
sub-neg66.9%
associate-/l*66.8%
Simplified66.8%
Final simplification80.3%
(FPCore (x y z t)
:precision binary64
(let* ((t_1 (* x (- 1.0 (/ y z)))))
(if (<= z -5.4e+39)
t_1
(if (<= z 1.76e-158)
(* x (/ y (- t z)))
(if (<= z 4.5e+77) (* x (/ (- y z) t)) t_1)))))
double code(double x, double y, double z, double t) {
double t_1 = x * (1.0 - (y / z));
double tmp;
if (z <= -5.4e+39) {
tmp = t_1;
} else if (z <= 1.76e-158) {
tmp = x * (y / (t - z));
} else if (z <= 4.5e+77) {
tmp = x * ((y - z) / t);
} else {
tmp = t_1;
}
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) :: tmp
t_1 = x * (1.0d0 - (y / z))
if (z <= (-5.4d+39)) then
tmp = t_1
else if (z <= 1.76d-158) then
tmp = x * (y / (t - z))
else if (z <= 4.5d+77) then
tmp = x * ((y - z) / t)
else
tmp = t_1
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double t_1 = x * (1.0 - (y / z));
double tmp;
if (z <= -5.4e+39) {
tmp = t_1;
} else if (z <= 1.76e-158) {
tmp = x * (y / (t - z));
} else if (z <= 4.5e+77) {
tmp = x * ((y - z) / t);
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t): t_1 = x * (1.0 - (y / z)) tmp = 0 if z <= -5.4e+39: tmp = t_1 elif z <= 1.76e-158: tmp = x * (y / (t - z)) elif z <= 4.5e+77: tmp = x * ((y - z) / t) else: tmp = t_1 return tmp
function code(x, y, z, t) t_1 = Float64(x * Float64(1.0 - Float64(y / z))) tmp = 0.0 if (z <= -5.4e+39) tmp = t_1; elseif (z <= 1.76e-158) tmp = Float64(x * Float64(y / Float64(t - z))); elseif (z <= 4.5e+77) tmp = Float64(x * Float64(Float64(y - z) / t)); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t) t_1 = x * (1.0 - (y / z)); tmp = 0.0; if (z <= -5.4e+39) tmp = t_1; elseif (z <= 1.76e-158) tmp = x * (y / (t - z)); elseif (z <= 4.5e+77) tmp = x * ((y - z) / t); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(x * N[(1.0 - N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -5.4e+39], t$95$1, If[LessEqual[z, 1.76e-158], N[(x * N[(y / N[(t - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 4.5e+77], N[(x * N[(N[(y - z), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x \cdot \left(1 - \frac{y}{z}\right)\\
\mathbf{if}\;z \leq -5.4 \cdot 10^{+39}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;z \leq 1.76 \cdot 10^{-158}:\\
\;\;\;\;x \cdot \frac{y}{t - z}\\
\mathbf{elif}\;z \leq 4.5 \cdot 10^{+77}:\\
\;\;\;\;x \cdot \frac{y - z}{t}\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if z < -5.40000000000000007e39 or 4.50000000000000024e77 < z Initial program 72.9%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 65.0%
mul-1-neg65.0%
associate-/l*88.9%
distribute-rgt-neg-in88.9%
distribute-frac-neg88.9%
neg-sub088.9%
associate--r-88.9%
neg-sub088.9%
+-commutative88.9%
sub-neg88.9%
div-sub88.9%
*-inverses88.9%
Simplified88.9%
if -5.40000000000000007e39 < z < 1.76e-158Initial program 96.9%
associate-/l*93.4%
Simplified93.4%
Taylor expanded in y around inf 82.0%
associate-/l*78.4%
Simplified78.4%
if 1.76e-158 < z < 4.50000000000000024e77Initial program 96.3%
associate-/l*97.9%
Simplified97.9%
Taylor expanded in t around inf 71.3%
associate-/l*71.3%
Simplified71.3%
Final simplification80.6%
(FPCore (x y z t)
:precision binary64
(if (<= z -1.6e+43)
(* x (- 1.0 (/ y z)))
(if (<= z 2.15e-158)
(* x (/ y (- t z)))
(if (<= z 4.5e+77) (* x (/ (- y z) t)) (* x (/ (- z y) z))))))
double code(double x, double y, double z, double t) {
double tmp;
if (z <= -1.6e+43) {
tmp = x * (1.0 - (y / z));
} else if (z <= 2.15e-158) {
tmp = x * (y / (t - z));
} else if (z <= 4.5e+77) {
tmp = x * ((y - z) / t);
} else {
tmp = x * ((z - y) / z);
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if (z <= (-1.6d+43)) then
tmp = x * (1.0d0 - (y / z))
else if (z <= 2.15d-158) then
tmp = x * (y / (t - z))
else if (z <= 4.5d+77) then
tmp = x * ((y - z) / t)
else
tmp = x * ((z - y) / z)
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if (z <= -1.6e+43) {
tmp = x * (1.0 - (y / z));
} else if (z <= 2.15e-158) {
tmp = x * (y / (t - z));
} else if (z <= 4.5e+77) {
tmp = x * ((y - z) / t);
} else {
tmp = x * ((z - y) / z);
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if z <= -1.6e+43: tmp = x * (1.0 - (y / z)) elif z <= 2.15e-158: tmp = x * (y / (t - z)) elif z <= 4.5e+77: tmp = x * ((y - z) / t) else: tmp = x * ((z - y) / z) return tmp
function code(x, y, z, t) tmp = 0.0 if (z <= -1.6e+43) tmp = Float64(x * Float64(1.0 - Float64(y / z))); elseif (z <= 2.15e-158) tmp = Float64(x * Float64(y / Float64(t - z))); elseif (z <= 4.5e+77) tmp = Float64(x * Float64(Float64(y - z) / t)); else tmp = Float64(x * Float64(Float64(z - y) / z)); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (z <= -1.6e+43) tmp = x * (1.0 - (y / z)); elseif (z <= 2.15e-158) tmp = x * (y / (t - z)); elseif (z <= 4.5e+77) tmp = x * ((y - z) / t); else tmp = x * ((z - y) / z); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[LessEqual[z, -1.6e+43], N[(x * N[(1.0 - N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 2.15e-158], N[(x * N[(y / N[(t - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 4.5e+77], N[(x * N[(N[(y - z), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], N[(x * N[(N[(z - y), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -1.6 \cdot 10^{+43}:\\
\;\;\;\;x \cdot \left(1 - \frac{y}{z}\right)\\
\mathbf{elif}\;z \leq 2.15 \cdot 10^{-158}:\\
\;\;\;\;x \cdot \frac{y}{t - z}\\
\mathbf{elif}\;z \leq 4.5 \cdot 10^{+77}:\\
\;\;\;\;x \cdot \frac{y - z}{t}\\
\mathbf{else}:\\
\;\;\;\;x \cdot \frac{z - y}{z}\\
\end{array}
\end{array}
if z < -1.60000000000000007e43Initial program 71.8%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 60.5%
mul-1-neg60.5%
associate-/l*86.9%
distribute-rgt-neg-in86.9%
distribute-frac-neg86.9%
neg-sub086.9%
associate--r-86.9%
neg-sub086.9%
+-commutative86.9%
sub-neg86.9%
div-sub86.9%
*-inverses86.9%
Simplified86.9%
if -1.60000000000000007e43 < z < 2.1499999999999998e-158Initial program 96.9%
associate-/l*93.4%
Simplified93.4%
Taylor expanded in y around inf 82.0%
associate-/l*78.4%
Simplified78.4%
if 2.1499999999999998e-158 < z < 4.50000000000000024e77Initial program 96.3%
associate-/l*97.9%
Simplified97.9%
Taylor expanded in t around inf 71.3%
associate-/l*71.3%
Simplified71.3%
if 4.50000000000000024e77 < z Initial program 74.4%
remove-double-neg74.4%
distribute-lft-neg-out74.4%
distribute-neg-frac74.4%
distribute-neg-frac274.4%
distribute-lft-neg-out74.4%
distribute-rgt-neg-in74.4%
sub-neg74.4%
distribute-neg-in74.4%
remove-double-neg74.4%
+-commutative74.4%
sub-neg74.4%
sub-neg74.4%
distribute-neg-in74.4%
remove-double-neg74.4%
+-commutative74.4%
sub-neg74.4%
Simplified74.4%
div-inv74.1%
*-commutative74.1%
associate-*l*67.6%
Applied egg-rr67.6%
Taylor expanded in t around 0 71.4%
associate-/l*91.8%
Simplified91.8%
Final simplification80.6%
(FPCore (x y z t)
:precision binary64
(if (<= z -1.95e+41)
(* x (- 1.0 (/ y z)))
(if (<= z 9e-152)
(* y (/ x (- t z)))
(if (<= z 2.4e+78) (* x (/ (- y z) t)) (* x (/ (- z y) z))))))
double code(double x, double y, double z, double t) {
double tmp;
if (z <= -1.95e+41) {
tmp = x * (1.0 - (y / z));
} else if (z <= 9e-152) {
tmp = y * (x / (t - z));
} else if (z <= 2.4e+78) {
tmp = x * ((y - z) / t);
} else {
tmp = x * ((z - y) / z);
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if (z <= (-1.95d+41)) then
tmp = x * (1.0d0 - (y / z))
else if (z <= 9d-152) then
tmp = y * (x / (t - z))
else if (z <= 2.4d+78) then
tmp = x * ((y - z) / t)
else
tmp = x * ((z - y) / z)
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if (z <= -1.95e+41) {
tmp = x * (1.0 - (y / z));
} else if (z <= 9e-152) {
tmp = y * (x / (t - z));
} else if (z <= 2.4e+78) {
tmp = x * ((y - z) / t);
} else {
tmp = x * ((z - y) / z);
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if z <= -1.95e+41: tmp = x * (1.0 - (y / z)) elif z <= 9e-152: tmp = y * (x / (t - z)) elif z <= 2.4e+78: tmp = x * ((y - z) / t) else: tmp = x * ((z - y) / z) return tmp
function code(x, y, z, t) tmp = 0.0 if (z <= -1.95e+41) tmp = Float64(x * Float64(1.0 - Float64(y / z))); elseif (z <= 9e-152) tmp = Float64(y * Float64(x / Float64(t - z))); elseif (z <= 2.4e+78) tmp = Float64(x * Float64(Float64(y - z) / t)); else tmp = Float64(x * Float64(Float64(z - y) / z)); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (z <= -1.95e+41) tmp = x * (1.0 - (y / z)); elseif (z <= 9e-152) tmp = y * (x / (t - z)); elseif (z <= 2.4e+78) tmp = x * ((y - z) / t); else tmp = x * ((z - y) / z); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[LessEqual[z, -1.95e+41], N[(x * N[(1.0 - N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 9e-152], N[(y * N[(x / N[(t - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 2.4e+78], N[(x * N[(N[(y - z), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], N[(x * N[(N[(z - y), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -1.95 \cdot 10^{+41}:\\
\;\;\;\;x \cdot \left(1 - \frac{y}{z}\right)\\
\mathbf{elif}\;z \leq 9 \cdot 10^{-152}:\\
\;\;\;\;y \cdot \frac{x}{t - z}\\
\mathbf{elif}\;z \leq 2.4 \cdot 10^{+78}:\\
\;\;\;\;x \cdot \frac{y - z}{t}\\
\mathbf{else}:\\
\;\;\;\;x \cdot \frac{z - y}{z}\\
\end{array}
\end{array}
if z < -1.9499999999999998e41Initial program 71.8%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 60.5%
mul-1-neg60.5%
associate-/l*86.9%
distribute-rgt-neg-in86.9%
distribute-frac-neg86.9%
neg-sub086.9%
associate--r-86.9%
neg-sub086.9%
+-commutative86.9%
sub-neg86.9%
div-sub86.9%
*-inverses86.9%
Simplified86.9%
if -1.9499999999999998e41 < z < 9.0000000000000008e-152Initial program 96.9%
associate-/l*93.5%
Simplified93.5%
Taylor expanded in y around inf 82.1%
*-commutative82.1%
associate-/l*80.7%
Applied egg-rr80.7%
if 9.0000000000000008e-152 < z < 2.3999999999999999e78Initial program 96.3%
associate-/l*97.9%
Simplified97.9%
Taylor expanded in t around inf 70.8%
associate-/l*70.8%
Simplified70.8%
if 2.3999999999999999e78 < z Initial program 74.4%
remove-double-neg74.4%
distribute-lft-neg-out74.4%
distribute-neg-frac74.4%
distribute-neg-frac274.4%
distribute-lft-neg-out74.4%
distribute-rgt-neg-in74.4%
sub-neg74.4%
distribute-neg-in74.4%
remove-double-neg74.4%
+-commutative74.4%
sub-neg74.4%
sub-neg74.4%
distribute-neg-in74.4%
remove-double-neg74.4%
+-commutative74.4%
sub-neg74.4%
Simplified74.4%
div-inv74.1%
*-commutative74.1%
associate-*l*67.6%
Applied egg-rr67.6%
Taylor expanded in t around 0 71.4%
associate-/l*91.8%
Simplified91.8%
Final simplification81.5%
(FPCore (x y z t)
:precision binary64
(if (<= z -4e+33)
(* x (- 1.0 (/ y z)))
(if (<= z 1.6e-158)
(* y (/ x (- t z)))
(if (<= z 4.5e+77) (/ x (/ t (- y z))) (* x (/ (- z y) z))))))
double code(double x, double y, double z, double t) {
double tmp;
if (z <= -4e+33) {
tmp = x * (1.0 - (y / z));
} else if (z <= 1.6e-158) {
tmp = y * (x / (t - z));
} else if (z <= 4.5e+77) {
tmp = x / (t / (y - z));
} else {
tmp = x * ((z - y) / z);
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if (z <= (-4d+33)) then
tmp = x * (1.0d0 - (y / z))
else if (z <= 1.6d-158) then
tmp = y * (x / (t - z))
else if (z <= 4.5d+77) then
tmp = x / (t / (y - z))
else
tmp = x * ((z - y) / z)
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if (z <= -4e+33) {
tmp = x * (1.0 - (y / z));
} else if (z <= 1.6e-158) {
tmp = y * (x / (t - z));
} else if (z <= 4.5e+77) {
tmp = x / (t / (y - z));
} else {
tmp = x * ((z - y) / z);
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if z <= -4e+33: tmp = x * (1.0 - (y / z)) elif z <= 1.6e-158: tmp = y * (x / (t - z)) elif z <= 4.5e+77: tmp = x / (t / (y - z)) else: tmp = x * ((z - y) / z) return tmp
function code(x, y, z, t) tmp = 0.0 if (z <= -4e+33) tmp = Float64(x * Float64(1.0 - Float64(y / z))); elseif (z <= 1.6e-158) tmp = Float64(y * Float64(x / Float64(t - z))); elseif (z <= 4.5e+77) tmp = Float64(x / Float64(t / Float64(y - z))); else tmp = Float64(x * Float64(Float64(z - y) / z)); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (z <= -4e+33) tmp = x * (1.0 - (y / z)); elseif (z <= 1.6e-158) tmp = y * (x / (t - z)); elseif (z <= 4.5e+77) tmp = x / (t / (y - z)); else tmp = x * ((z - y) / z); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[LessEqual[z, -4e+33], N[(x * N[(1.0 - N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 1.6e-158], N[(y * N[(x / N[(t - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 4.5e+77], N[(x / N[(t / N[(y - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x * N[(N[(z - y), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -4 \cdot 10^{+33}:\\
\;\;\;\;x \cdot \left(1 - \frac{y}{z}\right)\\
\mathbf{elif}\;z \leq 1.6 \cdot 10^{-158}:\\
\;\;\;\;y \cdot \frac{x}{t - z}\\
\mathbf{elif}\;z \leq 4.5 \cdot 10^{+77}:\\
\;\;\;\;\frac{x}{\frac{t}{y - z}}\\
\mathbf{else}:\\
\;\;\;\;x \cdot \frac{z - y}{z}\\
\end{array}
\end{array}
if z < -3.9999999999999998e33Initial program 71.8%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 60.5%
mul-1-neg60.5%
associate-/l*86.9%
distribute-rgt-neg-in86.9%
distribute-frac-neg86.9%
neg-sub086.9%
associate--r-86.9%
neg-sub086.9%
+-commutative86.9%
sub-neg86.9%
div-sub86.9%
*-inverses86.9%
Simplified86.9%
if -3.9999999999999998e33 < z < 1.59999999999999998e-158Initial program 96.9%
associate-/l*93.4%
Simplified93.4%
Taylor expanded in y around inf 82.0%
*-commutative82.0%
associate-/l*80.5%
Applied egg-rr80.5%
if 1.59999999999999998e-158 < z < 4.50000000000000024e77Initial program 96.3%
associate-/l*97.9%
Simplified97.9%
clear-num97.9%
un-div-inv98.1%
Applied egg-rr98.1%
Taylor expanded in t around inf 71.4%
if 4.50000000000000024e77 < z Initial program 74.4%
remove-double-neg74.4%
distribute-lft-neg-out74.4%
distribute-neg-frac74.4%
distribute-neg-frac274.4%
distribute-lft-neg-out74.4%
distribute-rgt-neg-in74.4%
sub-neg74.4%
distribute-neg-in74.4%
remove-double-neg74.4%
+-commutative74.4%
sub-neg74.4%
sub-neg74.4%
distribute-neg-in74.4%
remove-double-neg74.4%
+-commutative74.4%
sub-neg74.4%
Simplified74.4%
div-inv74.1%
*-commutative74.1%
associate-*l*67.6%
Applied egg-rr67.6%
Taylor expanded in t around 0 71.4%
associate-/l*91.8%
Simplified91.8%
Final simplification81.5%
(FPCore (x y z t)
:precision binary64
(if (<= z -1.05e+42)
(* x (- 1.0 (/ y z)))
(if (<= z 1.05e-210)
(/ (* x y) (- t z))
(if (<= z 4.5e+77) (/ x (/ t (- y z))) (* x (/ (- z y) z))))))
double code(double x, double y, double z, double t) {
double tmp;
if (z <= -1.05e+42) {
tmp = x * (1.0 - (y / z));
} else if (z <= 1.05e-210) {
tmp = (x * y) / (t - z);
} else if (z <= 4.5e+77) {
tmp = x / (t / (y - z));
} else {
tmp = x * ((z - y) / z);
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if (z <= (-1.05d+42)) then
tmp = x * (1.0d0 - (y / z))
else if (z <= 1.05d-210) then
tmp = (x * y) / (t - z)
else if (z <= 4.5d+77) then
tmp = x / (t / (y - z))
else
tmp = x * ((z - y) / z)
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if (z <= -1.05e+42) {
tmp = x * (1.0 - (y / z));
} else if (z <= 1.05e-210) {
tmp = (x * y) / (t - z);
} else if (z <= 4.5e+77) {
tmp = x / (t / (y - z));
} else {
tmp = x * ((z - y) / z);
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if z <= -1.05e+42: tmp = x * (1.0 - (y / z)) elif z <= 1.05e-210: tmp = (x * y) / (t - z) elif z <= 4.5e+77: tmp = x / (t / (y - z)) else: tmp = x * ((z - y) / z) return tmp
function code(x, y, z, t) tmp = 0.0 if (z <= -1.05e+42) tmp = Float64(x * Float64(1.0 - Float64(y / z))); elseif (z <= 1.05e-210) tmp = Float64(Float64(x * y) / Float64(t - z)); elseif (z <= 4.5e+77) tmp = Float64(x / Float64(t / Float64(y - z))); else tmp = Float64(x * Float64(Float64(z - y) / z)); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (z <= -1.05e+42) tmp = x * (1.0 - (y / z)); elseif (z <= 1.05e-210) tmp = (x * y) / (t - z); elseif (z <= 4.5e+77) tmp = x / (t / (y - z)); else tmp = x * ((z - y) / z); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[LessEqual[z, -1.05e+42], N[(x * N[(1.0 - N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 1.05e-210], N[(N[(x * y), $MachinePrecision] / N[(t - z), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 4.5e+77], N[(x / N[(t / N[(y - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x * N[(N[(z - y), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -1.05 \cdot 10^{+42}:\\
\;\;\;\;x \cdot \left(1 - \frac{y}{z}\right)\\
\mathbf{elif}\;z \leq 1.05 \cdot 10^{-210}:\\
\;\;\;\;\frac{x \cdot y}{t - z}\\
\mathbf{elif}\;z \leq 4.5 \cdot 10^{+77}:\\
\;\;\;\;\frac{x}{\frac{t}{y - z}}\\
\mathbf{else}:\\
\;\;\;\;x \cdot \frac{z - y}{z}\\
\end{array}
\end{array}
if z < -1.04999999999999998e42Initial program 71.8%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 60.5%
mul-1-neg60.5%
associate-/l*86.9%
distribute-rgt-neg-in86.9%
distribute-frac-neg86.9%
neg-sub086.9%
associate--r-86.9%
neg-sub086.9%
+-commutative86.9%
sub-neg86.9%
div-sub86.9%
*-inverses86.9%
Simplified86.9%
if -1.04999999999999998e42 < z < 1.05000000000000008e-210Initial program 97.5%
associate-/l*92.8%
Simplified92.8%
Taylor expanded in y around inf 81.3%
if 1.05000000000000008e-210 < z < 4.50000000000000024e77Initial program 95.3%
associate-/l*98.2%
Simplified98.2%
clear-num98.2%
un-div-inv98.3%
Applied egg-rr98.3%
Taylor expanded in t around inf 75.3%
if 4.50000000000000024e77 < z Initial program 74.4%
remove-double-neg74.4%
distribute-lft-neg-out74.4%
distribute-neg-frac74.4%
distribute-neg-frac274.4%
distribute-lft-neg-out74.4%
distribute-rgt-neg-in74.4%
sub-neg74.4%
distribute-neg-in74.4%
remove-double-neg74.4%
+-commutative74.4%
sub-neg74.4%
sub-neg74.4%
distribute-neg-in74.4%
remove-double-neg74.4%
+-commutative74.4%
sub-neg74.4%
Simplified74.4%
div-inv74.1%
*-commutative74.1%
associate-*l*67.6%
Applied egg-rr67.6%
Taylor expanded in t around 0 71.4%
associate-/l*91.8%
Simplified91.8%
Final simplification82.5%
(FPCore (x y z t) :precision binary64 (if (or (<= z -6e+33) (not (<= z 9e+53))) (* x (- 1.0 (/ y z))) (* x (/ y (- t z)))))
double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -6e+33) || !(z <= 9e+53)) {
tmp = x * (1.0 - (y / z));
} else {
tmp = x * (y / (t - z));
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if ((z <= (-6d+33)) .or. (.not. (z <= 9d+53))) then
tmp = x * (1.0d0 - (y / z))
else
tmp = x * (y / (t - z))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if ((z <= -6e+33) || !(z <= 9e+53)) {
tmp = x * (1.0 - (y / z));
} else {
tmp = x * (y / (t - z));
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if (z <= -6e+33) or not (z <= 9e+53): tmp = x * (1.0 - (y / z)) else: tmp = x * (y / (t - z)) return tmp
function code(x, y, z, t) tmp = 0.0 if ((z <= -6e+33) || !(z <= 9e+53)) tmp = Float64(x * Float64(1.0 - Float64(y / z))); else tmp = Float64(x * Float64(y / Float64(t - z))); end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if ((z <= -6e+33) || ~((z <= 9e+53))) tmp = x * (1.0 - (y / z)); else tmp = x * (y / (t - z)); end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[Or[LessEqual[z, -6e+33], N[Not[LessEqual[z, 9e+53]], $MachinePrecision]], N[(x * N[(1.0 - N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x * N[(y / N[(t - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -6 \cdot 10^{+33} \lor \neg \left(z \leq 9 \cdot 10^{+53}\right):\\
\;\;\;\;x \cdot \left(1 - \frac{y}{z}\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot \frac{y}{t - z}\\
\end{array}
\end{array}
if z < -5.99999999999999967e33 or 9.0000000000000004e53 < z Initial program 72.8%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 63.1%
mul-1-neg63.1%
associate-/l*87.2%
distribute-rgt-neg-in87.2%
distribute-frac-neg87.2%
neg-sub087.2%
associate--r-87.2%
neg-sub087.2%
+-commutative87.2%
sub-neg87.2%
div-sub87.2%
*-inverses87.2%
Simplified87.2%
if -5.99999999999999967e33 < z < 9.0000000000000004e53Initial program 97.2%
associate-/l*94.8%
Simplified94.8%
Taylor expanded in y around inf 74.1%
associate-/l*72.2%
Simplified72.2%
Final simplification77.6%
(FPCore (x y z t) :precision binary64 (if (<= z -1.6e+35) x (if (<= z 7e-21) (* x (/ y t)) x)))
double code(double x, double y, double z, double t) {
double tmp;
if (z <= -1.6e+35) {
tmp = x;
} else if (z <= 7e-21) {
tmp = x * (y / t);
} else {
tmp = x;
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if (z <= (-1.6d+35)) then
tmp = x
else if (z <= 7d-21) then
tmp = x * (y / t)
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if (z <= -1.6e+35) {
tmp = x;
} else if (z <= 7e-21) {
tmp = x * (y / t);
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if z <= -1.6e+35: tmp = x elif z <= 7e-21: tmp = x * (y / t) else: tmp = x return tmp
function code(x, y, z, t) tmp = 0.0 if (z <= -1.6e+35) tmp = x; elseif (z <= 7e-21) tmp = Float64(x * Float64(y / t)); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (z <= -1.6e+35) tmp = x; elseif (z <= 7e-21) tmp = x * (y / t); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[LessEqual[z, -1.6e+35], x, If[LessEqual[z, 7e-21], N[(x * N[(y / t), $MachinePrecision]), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -1.6 \cdot 10^{+35}:\\
\;\;\;\;x\\
\mathbf{elif}\;z \leq 7 \cdot 10^{-21}:\\
\;\;\;\;x \cdot \frac{y}{t}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if z < -1.59999999999999991e35 or 7.0000000000000007e-21 < z Initial program 76.1%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in z around inf 63.8%
if -1.59999999999999991e35 < z < 7.0000000000000007e-21Initial program 96.9%
associate-/l*94.4%
Simplified94.4%
Taylor expanded in z around 0 62.7%
associate-/l*61.8%
Simplified61.8%
Final simplification62.6%
(FPCore (x y z t) :precision binary64 (if (<= z -4.6e+33) x (if (<= z 2e-19) (/ (* x y) t) x)))
double code(double x, double y, double z, double t) {
double tmp;
if (z <= -4.6e+33) {
tmp = x;
} else if (z <= 2e-19) {
tmp = (x * y) / t;
} else {
tmp = x;
}
return tmp;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: tmp
if (z <= (-4.6d+33)) then
tmp = x
else if (z <= 2d-19) then
tmp = (x * y) / t
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z, double t) {
double tmp;
if (z <= -4.6e+33) {
tmp = x;
} else if (z <= 2e-19) {
tmp = (x * y) / t;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t): tmp = 0 if z <= -4.6e+33: tmp = x elif z <= 2e-19: tmp = (x * y) / t else: tmp = x return tmp
function code(x, y, z, t) tmp = 0.0 if (z <= -4.6e+33) tmp = x; elseif (z <= 2e-19) tmp = Float64(Float64(x * y) / t); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t) tmp = 0.0; if (z <= -4.6e+33) tmp = x; elseif (z <= 2e-19) tmp = (x * y) / t; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_] := If[LessEqual[z, -4.6e+33], x, If[LessEqual[z, 2e-19], N[(N[(x * y), $MachinePrecision] / t), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -4.6 \cdot 10^{+33}:\\
\;\;\;\;x\\
\mathbf{elif}\;z \leq 2 \cdot 10^{-19}:\\
\;\;\;\;\frac{x \cdot y}{t}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if z < -4.60000000000000021e33 or 2e-19 < z Initial program 76.1%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in z around inf 63.8%
if -4.60000000000000021e33 < z < 2e-19Initial program 96.9%
associate-/l*94.4%
Simplified94.4%
Taylor expanded in z around 0 62.7%
Final simplification63.2%
(FPCore (x y z t) :precision binary64 x)
double code(double x, double y, double z, double t) {
return x;
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
code = x
end function
public static double code(double x, double y, double z, double t) {
return x;
}
def code(x, y, z, t): return x
function code(x, y, z, t) return x end
function tmp = code(x, y, z, t) tmp = x; end
code[x_, y_, z_, t_] := x
\begin{array}{l}
\\
x
\end{array}
Initial program 88.3%
associate-/l*96.6%
Simplified96.6%
Taylor expanded in z around inf 34.2%
Final simplification34.2%
(FPCore (x y z t) :precision binary64 (/ x (/ (- t z) (- y z))))
double code(double x, double y, double z, double t) {
return x / ((t - z) / (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 = x / ((t - z) / (y - z))
end function
public static double code(double x, double y, double z, double t) {
return x / ((t - z) / (y - z));
}
def code(x, y, z, t): return x / ((t - z) / (y - z))
function code(x, y, z, t) return Float64(x / Float64(Float64(t - z) / Float64(y - z))) end
function tmp = code(x, y, z, t) tmp = x / ((t - z) / (y - z)); end
code[x_, y_, z_, t_] := N[(x / N[(N[(t - z), $MachinePrecision] / N[(y - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{x}{\frac{t - z}{y - z}}
\end{array}
herbie shell --seed 2024071
(FPCore (x y z t)
:name "Graphics.Rendering.Chart.Plot.AreaSpots:renderAreaSpots4D from Chart-1.5.3"
:precision binary64
:alt
(/ x (/ (- t z) (- y z)))
(/ (* x (- y z)) (- t z)))