
(FPCore (x y z t a) :precision binary64 (+ x (/ (* y (- z t)) (- z a))))
double code(double x, double y, double z, double t, double a) {
return x + ((y * (z - t)) / (z - a));
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
code = x + ((y * (z - t)) / (z - a))
end function
public static double code(double x, double y, double z, double t, double a) {
return x + ((y * (z - t)) / (z - a));
}
def code(x, y, z, t, a): return x + ((y * (z - t)) / (z - a))
function code(x, y, z, t, a) return Float64(x + Float64(Float64(y * Float64(z - t)) / Float64(z - a))) end
function tmp = code(x, y, z, t, a) tmp = x + ((y * (z - t)) / (z - a)); end
code[x_, y_, z_, t_, a_] := N[(x + N[(N[(y * N[(z - t), $MachinePrecision]), $MachinePrecision] / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{y \cdot \left(z - t\right)}{z - a}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 15 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t a) :precision binary64 (+ x (/ (* y (- z t)) (- z a))))
double code(double x, double y, double z, double t, double a) {
return x + ((y * (z - t)) / (z - a));
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
code = x + ((y * (z - t)) / (z - a))
end function
public static double code(double x, double y, double z, double t, double a) {
return x + ((y * (z - t)) / (z - a));
}
def code(x, y, z, t, a): return x + ((y * (z - t)) / (z - a))
function code(x, y, z, t, a) return Float64(x + Float64(Float64(y * Float64(z - t)) / Float64(z - a))) end
function tmp = code(x, y, z, t, a) tmp = x + ((y * (z - t)) / (z - a)); end
code[x_, y_, z_, t_, a_] := N[(x + N[(N[(y * N[(z - t), $MachinePrecision]), $MachinePrecision] / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{y \cdot \left(z - t\right)}{z - a}
\end{array}
(FPCore (x y z t a) :precision binary64 (+ x (/ y (/ (- z a) (- z t)))))
double code(double x, double y, double z, double t, double a) {
return x + (y / ((z - a) / (z - t)));
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
code = x + (y / ((z - a) / (z - t)))
end function
public static double code(double x, double y, double z, double t, double a) {
return x + (y / ((z - a) / (z - t)));
}
def code(x, y, z, t, a): return x + (y / ((z - a) / (z - t)))
function code(x, y, z, t, a) return Float64(x + Float64(y / Float64(Float64(z - a) / Float64(z - t)))) end
function tmp = code(x, y, z, t, a) tmp = x + (y / ((z - a) / (z - t))); end
code[x_, y_, z_, t_, a_] := N[(x + N[(y / N[(N[(z - a), $MachinePrecision] / N[(z - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{y}{\frac{z - a}{z - t}}
\end{array}
Initial program 86.0%
associate-/l*99.2%
Simplified99.2%
Final simplification99.2%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ x (* y (- 1.0 (/ t z))))))
(if (<= z -6.8e+80)
t_1
(if (<= z -2.25e-73)
(+ x (* z (/ y (- z a))))
(if (<= z 21000.0) (+ x (/ y (/ a t))) t_1)))))
double code(double x, double y, double z, double t, double a) {
double t_1 = x + (y * (1.0 - (t / z)));
double tmp;
if (z <= -6.8e+80) {
tmp = t_1;
} else if (z <= -2.25e-73) {
tmp = x + (z * (y / (z - a)));
} else if (z <= 21000.0) {
tmp = x + (y / (a / t));
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: t_1
real(8) :: tmp
t_1 = x + (y * (1.0d0 - (t / z)))
if (z <= (-6.8d+80)) then
tmp = t_1
else if (z <= (-2.25d-73)) then
tmp = x + (z * (y / (z - a)))
else if (z <= 21000.0d0) then
tmp = x + (y / (a / t))
else
tmp = t_1
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double t_1 = x + (y * (1.0 - (t / z)));
double tmp;
if (z <= -6.8e+80) {
tmp = t_1;
} else if (z <= -2.25e-73) {
tmp = x + (z * (y / (z - a)));
} else if (z <= 21000.0) {
tmp = x + (y / (a / t));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = x + (y * (1.0 - (t / z))) tmp = 0 if z <= -6.8e+80: tmp = t_1 elif z <= -2.25e-73: tmp = x + (z * (y / (z - a))) elif z <= 21000.0: tmp = x + (y / (a / t)) else: tmp = t_1 return tmp
function code(x, y, z, t, a) t_1 = Float64(x + Float64(y * Float64(1.0 - Float64(t / z)))) tmp = 0.0 if (z <= -6.8e+80) tmp = t_1; elseif (z <= -2.25e-73) tmp = Float64(x + Float64(z * Float64(y / Float64(z - a)))); elseif (z <= 21000.0) tmp = Float64(x + Float64(y / Float64(a / t))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = x + (y * (1.0 - (t / z))); tmp = 0.0; if (z <= -6.8e+80) tmp = t_1; elseif (z <= -2.25e-73) tmp = x + (z * (y / (z - a))); elseif (z <= 21000.0) tmp = x + (y / (a / t)); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(x + N[(y * N[(1.0 - N[(t / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -6.8e+80], t$95$1, If[LessEqual[z, -2.25e-73], N[(x + N[(z * N[(y / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 21000.0], N[(x + N[(y / N[(a / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + y \cdot \left(1 - \frac{t}{z}\right)\\
\mathbf{if}\;z \leq -6.8 \cdot 10^{+80}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq -2.25 \cdot 10^{-73}:\\
\;\;\;\;x + z \cdot \frac{y}{z - a}\\
\mathbf{elif}\;z \leq 21000:\\
\;\;\;\;x + \frac{y}{\frac{a}{t}}\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\end{array}
\end{array}
if z < -6.79999999999999984e80 or 21000 < z Initial program 71.2%
associate-/l*99.9%
Simplified99.9%
clear-num99.8%
associate-/r/99.9%
clear-num100.0%
Applied egg-rr100.0%
Taylor expanded in a around 0 91.8%
div-sub91.8%
*-inverses91.8%
Simplified91.8%
if -6.79999999999999984e80 < z < -2.25e-73Initial program 91.2%
associate-*l/99.7%
Simplified99.7%
Taylor expanded in t around 0 78.0%
associate-*l/86.3%
*-commutative86.3%
Simplified86.3%
if -2.25e-73 < z < 21000Initial program 99.9%
associate-/l*98.3%
Simplified98.3%
Taylor expanded in z around 0 83.2%
Final simplification87.4%
(FPCore (x y z t a)
:precision binary64
(if (<= z -6.8e+80)
(+ x (* y (- 1.0 (/ t z))))
(if (<= z -5.3e-73)
(+ x (* z (/ y (- z a))))
(if (<= z 2.15e-107) (+ x (/ y (/ a t))) (+ x (/ y (/ (- z a) z)))))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (z <= -6.8e+80) {
tmp = x + (y * (1.0 - (t / z)));
} else if (z <= -5.3e-73) {
tmp = x + (z * (y / (z - a)));
} else if (z <= 2.15e-107) {
tmp = x + (y / (a / t));
} else {
tmp = x + (y / ((z - a) / z));
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if (z <= (-6.8d+80)) then
tmp = x + (y * (1.0d0 - (t / z)))
else if (z <= (-5.3d-73)) then
tmp = x + (z * (y / (z - a)))
else if (z <= 2.15d-107) then
tmp = x + (y / (a / t))
else
tmp = x + (y / ((z - a) / z))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if (z <= -6.8e+80) {
tmp = x + (y * (1.0 - (t / z)));
} else if (z <= -5.3e-73) {
tmp = x + (z * (y / (z - a)));
} else if (z <= 2.15e-107) {
tmp = x + (y / (a / t));
} else {
tmp = x + (y / ((z - a) / z));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if z <= -6.8e+80: tmp = x + (y * (1.0 - (t / z))) elif z <= -5.3e-73: tmp = x + (z * (y / (z - a))) elif z <= 2.15e-107: tmp = x + (y / (a / t)) else: tmp = x + (y / ((z - a) / z)) return tmp
function code(x, y, z, t, a) tmp = 0.0 if (z <= -6.8e+80) tmp = Float64(x + Float64(y * Float64(1.0 - Float64(t / z)))); elseif (z <= -5.3e-73) tmp = Float64(x + Float64(z * Float64(y / Float64(z - a)))); elseif (z <= 2.15e-107) tmp = Float64(x + Float64(y / Float64(a / t))); else tmp = Float64(x + Float64(y / Float64(Float64(z - a) / z))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (z <= -6.8e+80) tmp = x + (y * (1.0 - (t / z))); elseif (z <= -5.3e-73) tmp = x + (z * (y / (z - a))); elseif (z <= 2.15e-107) tmp = x + (y / (a / t)); else tmp = x + (y / ((z - a) / z)); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[z, -6.8e+80], N[(x + N[(y * N[(1.0 - N[(t / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, -5.3e-73], N[(x + N[(z * N[(y / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 2.15e-107], N[(x + N[(y / N[(a / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x + N[(y / N[(N[(z - a), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -6.8 \cdot 10^{+80}:\\
\;\;\;\;x + y \cdot \left(1 - \frac{t}{z}\right)\\
\mathbf{elif}\;z \leq -5.3 \cdot 10^{-73}:\\
\;\;\;\;x + z \cdot \frac{y}{z - a}\\
\mathbf{elif}\;z \leq 2.15 \cdot 10^{-107}:\\
\;\;\;\;x + \frac{y}{\frac{a}{t}}\\
\mathbf{else}:\\
\;\;\;\;x + \frac{y}{\frac{z - a}{z}}\\
\end{array}
\end{array}
if z < -6.79999999999999984e80Initial program 64.1%
associate-/l*99.9%
Simplified99.9%
clear-num99.9%
associate-/r/99.9%
clear-num100.0%
Applied egg-rr100.0%
Taylor expanded in a around 0 91.4%
div-sub91.4%
*-inverses91.4%
Simplified91.4%
if -6.79999999999999984e80 < z < -5.29999999999999972e-73Initial program 91.2%
associate-*l/99.7%
Simplified99.7%
Taylor expanded in t around 0 78.0%
associate-*l/86.3%
*-commutative86.3%
Simplified86.3%
if -5.29999999999999972e-73 < z < 2.1499999999999999e-107Initial program 99.9%
associate-/l*97.8%
Simplified97.8%
Taylor expanded in z around 0 84.4%
if 2.1499999999999999e-107 < z Initial program 82.9%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 89.1%
Final simplification87.6%
(FPCore (x y z t a)
:precision binary64
(if (<= z -3.3e+83)
(+ x (* y (- 1.0 (/ t z))))
(if (<= z -2.6e-71)
(+ x (/ z (/ (- z a) y)))
(if (<= z 3.3e-106) (+ x (/ y (/ a t))) (+ x (/ y (/ (- z a) z)))))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (z <= -3.3e+83) {
tmp = x + (y * (1.0 - (t / z)));
} else if (z <= -2.6e-71) {
tmp = x + (z / ((z - a) / y));
} else if (z <= 3.3e-106) {
tmp = x + (y / (a / t));
} else {
tmp = x + (y / ((z - a) / z));
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if (z <= (-3.3d+83)) then
tmp = x + (y * (1.0d0 - (t / z)))
else if (z <= (-2.6d-71)) then
tmp = x + (z / ((z - a) / y))
else if (z <= 3.3d-106) then
tmp = x + (y / (a / t))
else
tmp = x + (y / ((z - a) / z))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if (z <= -3.3e+83) {
tmp = x + (y * (1.0 - (t / z)));
} else if (z <= -2.6e-71) {
tmp = x + (z / ((z - a) / y));
} else if (z <= 3.3e-106) {
tmp = x + (y / (a / t));
} else {
tmp = x + (y / ((z - a) / z));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if z <= -3.3e+83: tmp = x + (y * (1.0 - (t / z))) elif z <= -2.6e-71: tmp = x + (z / ((z - a) / y)) elif z <= 3.3e-106: tmp = x + (y / (a / t)) else: tmp = x + (y / ((z - a) / z)) return tmp
function code(x, y, z, t, a) tmp = 0.0 if (z <= -3.3e+83) tmp = Float64(x + Float64(y * Float64(1.0 - Float64(t / z)))); elseif (z <= -2.6e-71) tmp = Float64(x + Float64(z / Float64(Float64(z - a) / y))); elseif (z <= 3.3e-106) tmp = Float64(x + Float64(y / Float64(a / t))); else tmp = Float64(x + Float64(y / Float64(Float64(z - a) / z))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (z <= -3.3e+83) tmp = x + (y * (1.0 - (t / z))); elseif (z <= -2.6e-71) tmp = x + (z / ((z - a) / y)); elseif (z <= 3.3e-106) tmp = x + (y / (a / t)); else tmp = x + (y / ((z - a) / z)); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[z, -3.3e+83], N[(x + N[(y * N[(1.0 - N[(t / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, -2.6e-71], N[(x + N[(z / N[(N[(z - a), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 3.3e-106], N[(x + N[(y / N[(a / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x + N[(y / N[(N[(z - a), $MachinePrecision] / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -3.3 \cdot 10^{+83}:\\
\;\;\;\;x + y \cdot \left(1 - \frac{t}{z}\right)\\
\mathbf{elif}\;z \leq -2.6 \cdot 10^{-71}:\\
\;\;\;\;x + \frac{z}{\frac{z - a}{y}}\\
\mathbf{elif}\;z \leq 3.3 \cdot 10^{-106}:\\
\;\;\;\;x + \frac{y}{\frac{a}{t}}\\
\mathbf{else}:\\
\;\;\;\;x + \frac{y}{\frac{z - a}{z}}\\
\end{array}
\end{array}
if z < -3.29999999999999985e83Initial program 64.1%
associate-/l*99.9%
Simplified99.9%
clear-num99.9%
associate-/r/99.9%
clear-num100.0%
Applied egg-rr100.0%
Taylor expanded in a around 0 91.4%
div-sub91.4%
*-inverses91.4%
Simplified91.4%
if -3.29999999999999985e83 < z < -2.5999999999999999e-71Initial program 91.2%
associate-*l/99.7%
Simplified99.7%
Taylor expanded in t around 0 78.0%
associate-*l/86.3%
*-commutative86.3%
Simplified86.3%
clear-num86.3%
un-div-inv86.4%
Applied egg-rr86.4%
if -2.5999999999999999e-71 < z < 3.30000000000000016e-106Initial program 99.9%
associate-/l*97.8%
Simplified97.8%
Taylor expanded in z around 0 84.4%
if 3.30000000000000016e-106 < z Initial program 82.9%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around 0 89.1%
Final simplification87.6%
(FPCore (x y z t a) :precision binary64 (if (or (<= z -1.62e-71) (not (<= z 4.3e-106))) (+ x (* z (/ y (- z a)))) (+ x (/ y (/ a t)))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if ((z <= -1.62e-71) || !(z <= 4.3e-106)) {
tmp = x + (z * (y / (z - a)));
} else {
tmp = x + (y / (a / t));
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if ((z <= (-1.62d-71)) .or. (.not. (z <= 4.3d-106))) then
tmp = x + (z * (y / (z - a)))
else
tmp = x + (y / (a / t))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if ((z <= -1.62e-71) || !(z <= 4.3e-106)) {
tmp = x + (z * (y / (z - a)));
} else {
tmp = x + (y / (a / t));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if (z <= -1.62e-71) or not (z <= 4.3e-106): tmp = x + (z * (y / (z - a))) else: tmp = x + (y / (a / t)) return tmp
function code(x, y, z, t, a) tmp = 0.0 if ((z <= -1.62e-71) || !(z <= 4.3e-106)) tmp = Float64(x + Float64(z * Float64(y / Float64(z - a)))); else tmp = Float64(x + Float64(y / Float64(a / t))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if ((z <= -1.62e-71) || ~((z <= 4.3e-106))) tmp = x + (z * (y / (z - a))); else tmp = x + (y / (a / t)); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[Or[LessEqual[z, -1.62e-71], N[Not[LessEqual[z, 4.3e-106]], $MachinePrecision]], N[(x + N[(z * N[(y / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x + N[(y / N[(a / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -1.62 \cdot 10^{-71} \lor \neg \left(z \leq 4.3 \cdot 10^{-106}\right):\\
\;\;\;\;x + z \cdot \frac{y}{z - a}\\
\mathbf{else}:\\
\;\;\;\;x + \frac{y}{\frac{a}{t}}\\
\end{array}
\end{array}
if z < -1.6200000000000001e-71 or 4.3000000000000002e-106 < z Initial program 78.7%
associate-*l/97.0%
Simplified97.0%
Taylor expanded in t around 0 69.5%
associate-*l/84.5%
*-commutative84.5%
Simplified84.5%
if -1.6200000000000001e-71 < z < 4.3000000000000002e-106Initial program 99.9%
associate-/l*97.8%
Simplified97.8%
Taylor expanded in z around 0 84.4%
Final simplification84.5%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (/ y (- z a))))
(if (or (<= t -6.8e+51) (not (<= t 3.3e+37)))
(- x (* t t_1))
(+ x (* z t_1)))))
double code(double x, double y, double z, double t, double a) {
double t_1 = y / (z - a);
double tmp;
if ((t <= -6.8e+51) || !(t <= 3.3e+37)) {
tmp = x - (t * t_1);
} else {
tmp = x + (z * t_1);
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: t_1
real(8) :: tmp
t_1 = y / (z - a)
if ((t <= (-6.8d+51)) .or. (.not. (t <= 3.3d+37))) then
tmp = x - (t * t_1)
else
tmp = x + (z * t_1)
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double t_1 = y / (z - a);
double tmp;
if ((t <= -6.8e+51) || !(t <= 3.3e+37)) {
tmp = x - (t * t_1);
} else {
tmp = x + (z * t_1);
}
return tmp;
}
def code(x, y, z, t, a): t_1 = y / (z - a) tmp = 0 if (t <= -6.8e+51) or not (t <= 3.3e+37): tmp = x - (t * t_1) else: tmp = x + (z * t_1) return tmp
function code(x, y, z, t, a) t_1 = Float64(y / Float64(z - a)) tmp = 0.0 if ((t <= -6.8e+51) || !(t <= 3.3e+37)) tmp = Float64(x - Float64(t * t_1)); else tmp = Float64(x + Float64(z * t_1)); end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = y / (z - a); tmp = 0.0; if ((t <= -6.8e+51) || ~((t <= 3.3e+37))) tmp = x - (t * t_1); else tmp = x + (z * t_1); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(y / N[(z - a), $MachinePrecision]), $MachinePrecision]}, If[Or[LessEqual[t, -6.8e+51], N[Not[LessEqual[t, 3.3e+37]], $MachinePrecision]], N[(x - N[(t * t$95$1), $MachinePrecision]), $MachinePrecision], N[(x + N[(z * t$95$1), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \frac{y}{z - a}\\
\mathbf{if}\;t \leq -6.8 \cdot 10^{+51} \lor \neg \left(t \leq 3.3 \cdot 10^{+37}\right):\\
\;\;\;\;x - t \cdot t_1\\
\mathbf{else}:\\
\;\;\;\;x + z \cdot t_1\\
\end{array}
\end{array}
if t < -6.79999999999999969e51 or 3.3000000000000001e37 < t Initial program 87.5%
associate-/l*98.2%
Simplified98.2%
Taylor expanded in t around inf 87.0%
associate-*r/87.0%
neg-mul-187.0%
Simplified87.0%
frac-2neg87.0%
div-inv86.9%
distribute-neg-frac86.9%
remove-double-neg86.9%
add-sqr-sqrt40.4%
sqrt-unprod53.4%
sqr-neg53.4%
sqrt-unprod15.5%
add-sqr-sqrt37.2%
clear-num37.2%
cancel-sign-sub-inv37.2%
add-sqr-sqrt15.5%
sqrt-unprod53.4%
sqr-neg53.4%
sqrt-unprod40.4%
add-sqr-sqrt86.9%
Applied egg-rr86.9%
associate-*r/83.0%
associate-*l/85.7%
*-commutative85.7%
Simplified85.7%
if -6.79999999999999969e51 < t < 3.3000000000000001e37Initial program 84.9%
associate-*l/98.2%
Simplified98.2%
Taylor expanded in t around 0 77.3%
associate-*l/94.3%
*-commutative94.3%
Simplified94.3%
Final simplification90.7%
(FPCore (x y z t a) :precision binary64 (if (or (<= t -4.1e+52) (not (<= t 6e+37))) (- x (* y (/ t (- z a)))) (+ x (* z (/ y (- z a))))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if ((t <= -4.1e+52) || !(t <= 6e+37)) {
tmp = x - (y * (t / (z - a)));
} else {
tmp = x + (z * (y / (z - a)));
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if ((t <= (-4.1d+52)) .or. (.not. (t <= 6d+37))) then
tmp = x - (y * (t / (z - a)))
else
tmp = x + (z * (y / (z - a)))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if ((t <= -4.1e+52) || !(t <= 6e+37)) {
tmp = x - (y * (t / (z - a)));
} else {
tmp = x + (z * (y / (z - a)));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if (t <= -4.1e+52) or not (t <= 6e+37): tmp = x - (y * (t / (z - a))) else: tmp = x + (z * (y / (z - a))) return tmp
function code(x, y, z, t, a) tmp = 0.0 if ((t <= -4.1e+52) || !(t <= 6e+37)) tmp = Float64(x - Float64(y * Float64(t / Float64(z - a)))); else tmp = Float64(x + Float64(z * Float64(y / Float64(z - a)))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if ((t <= -4.1e+52) || ~((t <= 6e+37))) tmp = x - (y * (t / (z - a))); else tmp = x + (z * (y / (z - a))); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[Or[LessEqual[t, -4.1e+52], N[Not[LessEqual[t, 6e+37]], $MachinePrecision]], N[(x - N[(y * N[(t / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x + N[(z * N[(y / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;t \leq -4.1 \cdot 10^{+52} \lor \neg \left(t \leq 6 \cdot 10^{+37}\right):\\
\;\;\;\;x - y \cdot \frac{t}{z - a}\\
\mathbf{else}:\\
\;\;\;\;x + z \cdot \frac{y}{z - a}\\
\end{array}
\end{array}
if t < -4.1e52 or 6.00000000000000043e37 < t Initial program 87.5%
associate-/l*98.2%
Simplified98.2%
Taylor expanded in t around inf 87.0%
associate-*r/87.0%
neg-mul-187.0%
Simplified87.0%
frac-2neg87.0%
div-inv86.9%
distribute-neg-frac86.9%
remove-double-neg86.9%
add-sqr-sqrt40.4%
sqrt-unprod53.4%
sqr-neg53.4%
sqrt-unprod15.5%
add-sqr-sqrt37.2%
clear-num37.2%
cancel-sign-sub-inv37.2%
add-sqr-sqrt15.5%
sqrt-unprod53.4%
sqr-neg53.4%
sqrt-unprod40.4%
add-sqr-sqrt86.9%
Applied egg-rr86.9%
if -4.1e52 < t < 6.00000000000000043e37Initial program 84.9%
associate-*l/98.2%
Simplified98.2%
Taylor expanded in t around 0 77.3%
associate-*l/94.3%
*-commutative94.3%
Simplified94.3%
Final simplification91.2%
(FPCore (x y z t a) :precision binary64 (if (<= t -4e+51) (- x (/ y (/ (- z a) t))) (if (<= t 3.1e+37) (+ x (* z (/ y (- z a)))) (- x (* y (/ t (- z a)))))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (t <= -4e+51) {
tmp = x - (y / ((z - a) / t));
} else if (t <= 3.1e+37) {
tmp = x + (z * (y / (z - a)));
} else {
tmp = x - (y * (t / (z - a)));
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if (t <= (-4d+51)) then
tmp = x - (y / ((z - a) / t))
else if (t <= 3.1d+37) then
tmp = x + (z * (y / (z - a)))
else
tmp = x - (y * (t / (z - a)))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if (t <= -4e+51) {
tmp = x - (y / ((z - a) / t));
} else if (t <= 3.1e+37) {
tmp = x + (z * (y / (z - a)));
} else {
tmp = x - (y * (t / (z - a)));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if t <= -4e+51: tmp = x - (y / ((z - a) / t)) elif t <= 3.1e+37: tmp = x + (z * (y / (z - a))) else: tmp = x - (y * (t / (z - a))) return tmp
function code(x, y, z, t, a) tmp = 0.0 if (t <= -4e+51) tmp = Float64(x - Float64(y / Float64(Float64(z - a) / t))); elseif (t <= 3.1e+37) tmp = Float64(x + Float64(z * Float64(y / Float64(z - a)))); else tmp = Float64(x - Float64(y * Float64(t / Float64(z - a)))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (t <= -4e+51) tmp = x - (y / ((z - a) / t)); elseif (t <= 3.1e+37) tmp = x + (z * (y / (z - a))); else tmp = x - (y * (t / (z - a))); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[t, -4e+51], N[(x - N[(y / N[(N[(z - a), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t, 3.1e+37], N[(x + N[(z * N[(y / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x - N[(y * N[(t / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;t \leq -4 \cdot 10^{+51}:\\
\;\;\;\;x - \frac{y}{\frac{z - a}{t}}\\
\mathbf{elif}\;t \leq 3.1 \cdot 10^{+37}:\\
\;\;\;\;x + z \cdot \frac{y}{z - a}\\
\mathbf{else}:\\
\;\;\;\;x - y \cdot \frac{t}{z - a}\\
\end{array}
\end{array}
if t < -4e51Initial program 93.1%
associate-/l*96.7%
Simplified96.7%
Taylor expanded in t around inf 84.5%
associate-*r/84.5%
neg-mul-184.5%
Simplified84.5%
frac-2neg84.5%
div-inv84.4%
distribute-neg-frac84.4%
remove-double-neg84.4%
add-sqr-sqrt37.9%
sqrt-unprod46.1%
sqr-neg46.1%
sqrt-unprod9.9%
add-sqr-sqrt33.6%
clear-num33.6%
cancel-sign-sub-inv33.6%
add-sqr-sqrt9.9%
sqrt-unprod46.1%
sqr-neg46.1%
sqrt-unprod37.9%
add-sqr-sqrt84.4%
Applied egg-rr84.4%
clear-num84.4%
un-div-inv84.5%
Applied egg-rr84.5%
if -4e51 < t < 3.1000000000000002e37Initial program 84.9%
associate-*l/98.2%
Simplified98.2%
Taylor expanded in t around 0 77.3%
associate-*l/94.3%
*-commutative94.3%
Simplified94.3%
if 3.1000000000000002e37 < t Initial program 81.6%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around inf 89.6%
associate-*r/89.6%
neg-mul-189.6%
Simplified89.6%
frac-2neg89.6%
div-inv89.6%
distribute-neg-frac89.6%
remove-double-neg89.6%
add-sqr-sqrt43.1%
sqrt-unprod61.2%
sqr-neg61.2%
sqrt-unprod21.5%
add-sqr-sqrt41.1%
clear-num41.1%
cancel-sign-sub-inv41.1%
add-sqr-sqrt21.5%
sqrt-unprod61.2%
sqr-neg61.2%
sqrt-unprod43.1%
add-sqr-sqrt89.7%
Applied egg-rr89.7%
Final simplification91.2%
(FPCore (x y z t a) :precision binary64 (if (or (<= z -3.2e-27) (not (<= z 14200.0))) (+ x y) (+ x (* y (/ t a)))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if ((z <= -3.2e-27) || !(z <= 14200.0)) {
tmp = x + y;
} else {
tmp = x + (y * (t / a));
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if ((z <= (-3.2d-27)) .or. (.not. (z <= 14200.0d0))) then
tmp = x + y
else
tmp = x + (y * (t / a))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if ((z <= -3.2e-27) || !(z <= 14200.0)) {
tmp = x + y;
} else {
tmp = x + (y * (t / a));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if (z <= -3.2e-27) or not (z <= 14200.0): tmp = x + y else: tmp = x + (y * (t / a)) return tmp
function code(x, y, z, t, a) tmp = 0.0 if ((z <= -3.2e-27) || !(z <= 14200.0)) tmp = Float64(x + y); else tmp = Float64(x + Float64(y * Float64(t / a))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if ((z <= -3.2e-27) || ~((z <= 14200.0))) tmp = x + y; else tmp = x + (y * (t / a)); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[Or[LessEqual[z, -3.2e-27], N[Not[LessEqual[z, 14200.0]], $MachinePrecision]], N[(x + y), $MachinePrecision], N[(x + N[(y * N[(t / a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -3.2 \cdot 10^{-27} \lor \neg \left(z \leq 14200\right):\\
\;\;\;\;x + y\\
\mathbf{else}:\\
\;\;\;\;x + y \cdot \frac{t}{a}\\
\end{array}
\end{array}
if z < -3.19999999999999991e-27 or 14200 < z Initial program 74.0%
associate-*l/96.1%
Simplified96.1%
Taylor expanded in z around inf 80.9%
if -3.19999999999999991e-27 < z < 14200Initial program 98.6%
associate-/l*98.5%
Simplified98.5%
clear-num98.4%
associate-/r/98.4%
clear-num98.4%
Applied egg-rr98.4%
Taylor expanded in z around 0 80.4%
Final simplification80.7%
(FPCore (x y z t a) :precision binary64 (if (or (<= z -1.7e-26) (not (<= z 2050000.0))) (+ x y) (+ x (/ y (/ a t)))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if ((z <= -1.7e-26) || !(z <= 2050000.0)) {
tmp = x + y;
} else {
tmp = x + (y / (a / t));
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if ((z <= (-1.7d-26)) .or. (.not. (z <= 2050000.0d0))) then
tmp = x + y
else
tmp = x + (y / (a / t))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if ((z <= -1.7e-26) || !(z <= 2050000.0)) {
tmp = x + y;
} else {
tmp = x + (y / (a / t));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if (z <= -1.7e-26) or not (z <= 2050000.0): tmp = x + y else: tmp = x + (y / (a / t)) return tmp
function code(x, y, z, t, a) tmp = 0.0 if ((z <= -1.7e-26) || !(z <= 2050000.0)) tmp = Float64(x + y); else tmp = Float64(x + Float64(y / Float64(a / t))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if ((z <= -1.7e-26) || ~((z <= 2050000.0))) tmp = x + y; else tmp = x + (y / (a / t)); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[Or[LessEqual[z, -1.7e-26], N[Not[LessEqual[z, 2050000.0]], $MachinePrecision]], N[(x + y), $MachinePrecision], N[(x + N[(y / N[(a / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -1.7 \cdot 10^{-26} \lor \neg \left(z \leq 2050000\right):\\
\;\;\;\;x + y\\
\mathbf{else}:\\
\;\;\;\;x + \frac{y}{\frac{a}{t}}\\
\end{array}
\end{array}
if z < -1.70000000000000007e-26 or 2.05e6 < z Initial program 74.0%
associate-*l/96.1%
Simplified96.1%
Taylor expanded in z around inf 80.9%
if -1.70000000000000007e-26 < z < 2.05e6Initial program 98.6%
associate-/l*98.5%
Simplified98.5%
Taylor expanded in z around 0 81.1%
Final simplification81.0%
(FPCore (x y z t a) :precision binary64 (if (<= a -3.6e+170) x (if (<= a 2.6e+58) (+ x (* z (/ y z))) x)))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -3.6e+170) {
tmp = x;
} else if (a <= 2.6e+58) {
tmp = x + (z * (y / z));
} else {
tmp = x;
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if (a <= (-3.6d+170)) then
tmp = x
else if (a <= 2.6d+58) then
tmp = x + (z * (y / z))
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -3.6e+170) {
tmp = x;
} else if (a <= 2.6e+58) {
tmp = x + (z * (y / z));
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if a <= -3.6e+170: tmp = x elif a <= 2.6e+58: tmp = x + (z * (y / z)) else: tmp = x return tmp
function code(x, y, z, t, a) tmp = 0.0 if (a <= -3.6e+170) tmp = x; elseif (a <= 2.6e+58) tmp = Float64(x + Float64(z * Float64(y / z))); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (a <= -3.6e+170) tmp = x; elseif (a <= 2.6e+58) tmp = x + (z * (y / z)); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[a, -3.6e+170], x, If[LessEqual[a, 2.6e+58], N[(x + N[(z * N[(y / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -3.6 \cdot 10^{+170}:\\
\;\;\;\;x\\
\mathbf{elif}\;a \leq 2.6 \cdot 10^{+58}:\\
\;\;\;\;x + z \cdot \frac{y}{z}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if a < -3.6e170 or 2.59999999999999988e58 < a Initial program 87.4%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around inf 91.0%
associate-*r/91.0%
neg-mul-191.0%
Simplified91.0%
Taylor expanded in x around inf 75.8%
if -3.6e170 < a < 2.59999999999999988e58Initial program 85.4%
associate-*l/96.8%
Simplified96.8%
Taylor expanded in t around 0 55.9%
associate-*l/71.7%
*-commutative71.7%
Simplified71.7%
Taylor expanded in z around inf 67.2%
Final simplification69.8%
(FPCore (x y z t a) :precision binary64 (+ x (* (- z t) (/ y (- z a)))))
double code(double x, double y, double z, double t, double a) {
return x + ((z - t) * (y / (z - a)));
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
code = x + ((z - t) * (y / (z - a)))
end function
public static double code(double x, double y, double z, double t, double a) {
return x + ((z - t) * (y / (z - a)));
}
def code(x, y, z, t, a): return x + ((z - t) * (y / (z - a)))
function code(x, y, z, t, a) return Float64(x + Float64(Float64(z - t) * Float64(y / Float64(z - a)))) end
function tmp = code(x, y, z, t, a) tmp = x + ((z - t) * (y / (z - a))); end
code[x_, y_, z_, t_, a_] := N[(x + N[(N[(z - t), $MachinePrecision] * N[(y / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \left(z - t\right) \cdot \frac{y}{z - a}
\end{array}
Initial program 86.0%
associate-*l/96.5%
Simplified96.5%
Final simplification96.5%
(FPCore (x y z t a) :precision binary64 (+ x (* y (/ (- z t) (- z a)))))
double code(double x, double y, double z, double t, double a) {
return x + (y * ((z - t) / (z - a)));
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
code = x + (y * ((z - t) / (z - a)))
end function
public static double code(double x, double y, double z, double t, double a) {
return x + (y * ((z - t) / (z - a)));
}
def code(x, y, z, t, a): return x + (y * ((z - t) / (z - a)))
function code(x, y, z, t, a) return Float64(x + Float64(y * Float64(Float64(z - t) / Float64(z - a)))) end
function tmp = code(x, y, z, t, a) tmp = x + (y * ((z - t) / (z - a))); end
code[x_, y_, z_, t_, a_] := N[(x + N[(y * N[(N[(z - t), $MachinePrecision] / N[(z - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + y \cdot \frac{z - t}{z - a}
\end{array}
Initial program 86.0%
associate-/l*99.2%
Simplified99.2%
clear-num99.1%
associate-/r/99.2%
clear-num99.2%
Applied egg-rr99.2%
Final simplification99.2%
(FPCore (x y z t a) :precision binary64 (if (<= a -6.6e+170) x (if (<= a 3e+58) (+ x y) x)))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -6.6e+170) {
tmp = x;
} else if (a <= 3e+58) {
tmp = x + y;
} else {
tmp = x;
}
return tmp;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
real(8) :: tmp
if (a <= (-6.6d+170)) then
tmp = x
else if (a <= 3d+58) then
tmp = x + y
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -6.6e+170) {
tmp = x;
} else if (a <= 3e+58) {
tmp = x + y;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if a <= -6.6e+170: tmp = x elif a <= 3e+58: tmp = x + y else: tmp = x return tmp
function code(x, y, z, t, a) tmp = 0.0 if (a <= -6.6e+170) tmp = x; elseif (a <= 3e+58) tmp = Float64(x + y); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (a <= -6.6e+170) tmp = x; elseif (a <= 3e+58) tmp = x + y; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[a, -6.6e+170], x, If[LessEqual[a, 3e+58], N[(x + y), $MachinePrecision], x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -6.6 \cdot 10^{+170}:\\
\;\;\;\;x\\
\mathbf{elif}\;a \leq 3 \cdot 10^{+58}:\\
\;\;\;\;x + y\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if a < -6.60000000000000047e170 or 3.0000000000000002e58 < a Initial program 87.4%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in t around inf 91.0%
associate-*r/91.0%
neg-mul-191.0%
Simplified91.0%
Taylor expanded in x around inf 75.8%
if -6.60000000000000047e170 < a < 3.0000000000000002e58Initial program 85.4%
associate-*l/96.8%
Simplified96.8%
Taylor expanded in z around inf 66.5%
Final simplification69.3%
(FPCore (x y z t a) :precision binary64 x)
double code(double x, double y, double z, double t, double a) {
return x;
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
code = x
end function
public static double code(double x, double y, double z, double t, double a) {
return x;
}
def code(x, y, z, t, a): return x
function code(x, y, z, t, a) return x end
function tmp = code(x, y, z, t, a) tmp = x; end
code[x_, y_, z_, t_, a_] := x
\begin{array}{l}
\\
x
\end{array}
Initial program 86.0%
associate-/l*99.2%
Simplified99.2%
Taylor expanded in t around inf 76.9%
associate-*r/76.9%
neg-mul-176.9%
Simplified76.9%
Taylor expanded in x around inf 52.1%
Final simplification52.1%
(FPCore (x y z t a) :precision binary64 (+ x (/ y (/ (- z a) (- z t)))))
double code(double x, double y, double z, double t, double a) {
return x + (y / ((z - a) / (z - t)));
}
real(8) function code(x, y, z, t, a)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8), intent (in) :: a
code = x + (y / ((z - a) / (z - t)))
end function
public static double code(double x, double y, double z, double t, double a) {
return x + (y / ((z - a) / (z - t)));
}
def code(x, y, z, t, a): return x + (y / ((z - a) / (z - t)))
function code(x, y, z, t, a) return Float64(x + Float64(y / Float64(Float64(z - a) / Float64(z - t)))) end
function tmp = code(x, y, z, t, a) tmp = x + (y / ((z - a) / (z - t))); end
code[x_, y_, z_, t_, a_] := N[(x + N[(y / N[(N[(z - a), $MachinePrecision] / N[(z - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{y}{\frac{z - a}{z - t}}
\end{array}
herbie shell --seed 2023308
(FPCore (x y z t a)
:name "Graphics.Rendering.Plot.Render.Plot.Axis:renderAxisTicks from plot-0.2.3.4, A"
:precision binary64
:herbie-target
(+ x (/ y (/ (- z a) (- z t))))
(+ x (/ (* y (- z t)) (- z a))))