
(FPCore (x y z t a) :precision binary64 (+ x (/ (* (- y x) (- z t)) (- a t))))
double code(double x, double y, double z, double t, double a) {
return x + (((y - x) * (z - t)) / (a - 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 - x) * (z - t)) / (a - t))
end function
public static double code(double x, double y, double z, double t, double a) {
return x + (((y - x) * (z - t)) / (a - t));
}
def code(x, y, z, t, a): return x + (((y - x) * (z - t)) / (a - t))
function code(x, y, z, t, a) return Float64(x + Float64(Float64(Float64(y - x) * Float64(z - t)) / Float64(a - t))) end
function tmp = code(x, y, z, t, a) tmp = x + (((y - x) * (z - t)) / (a - t)); end
code[x_, y_, z_, t_, a_] := N[(x + N[(N[(N[(y - x), $MachinePrecision] * N[(z - t), $MachinePrecision]), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{\left(y - x\right) \cdot \left(z - t\right)}{a - t}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 18 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t a) :precision binary64 (+ x (/ (* (- y x) (- z t)) (- a t))))
double code(double x, double y, double z, double t, double a) {
return x + (((y - x) * (z - t)) / (a - 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 - x) * (z - t)) / (a - t))
end function
public static double code(double x, double y, double z, double t, double a) {
return x + (((y - x) * (z - t)) / (a - t));
}
def code(x, y, z, t, a): return x + (((y - x) * (z - t)) / (a - t))
function code(x, y, z, t, a) return Float64(x + Float64(Float64(Float64(y - x) * Float64(z - t)) / Float64(a - t))) end
function tmp = code(x, y, z, t, a) tmp = x + (((y - x) * (z - t)) / (a - t)); end
code[x_, y_, z_, t_, a_] := N[(x + N[(N[(N[(y - x), $MachinePrecision] * N[(z - t), $MachinePrecision]), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \frac{\left(y - x\right) \cdot \left(z - t\right)}{a - t}
\end{array}
(FPCore (x y z t a)
:precision binary64
(if (<= t -2.6e+97)
(+ y (* (/ (- y x) t) (- a z)))
(if (<= t 8e+53)
(fma (- y x) (/ (- z t) (- a t)) x)
(+ y (* (- y x) (/ (- a z) t))))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (t <= -2.6e+97) {
tmp = y + (((y - x) / t) * (a - z));
} else if (t <= 8e+53) {
tmp = fma((y - x), ((z - t) / (a - t)), x);
} else {
tmp = y + ((y - x) * ((a - z) / t));
}
return tmp;
}
function code(x, y, z, t, a) tmp = 0.0 if (t <= -2.6e+97) tmp = Float64(y + Float64(Float64(Float64(y - x) / t) * Float64(a - z))); elseif (t <= 8e+53) tmp = fma(Float64(y - x), Float64(Float64(z - t) / Float64(a - t)), x); else tmp = Float64(y + Float64(Float64(y - x) * Float64(Float64(a - z) / t))); end return tmp end
code[x_, y_, z_, t_, a_] := If[LessEqual[t, -2.6e+97], N[(y + N[(N[(N[(y - x), $MachinePrecision] / t), $MachinePrecision] * N[(a - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t, 8e+53], N[(N[(y - x), $MachinePrecision] * N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision], N[(y + N[(N[(y - x), $MachinePrecision] * N[(N[(a - z), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;t \leq -2.6 \cdot 10^{+97}:\\
\;\;\;\;y + \frac{y - x}{t} \cdot \left(a - z\right)\\
\mathbf{elif}\;t \leq 8 \cdot 10^{+53}:\\
\;\;\;\;\mathsf{fma}\left(y - x, \frac{z - t}{a - t}, x\right)\\
\mathbf{else}:\\
\;\;\;\;y + \left(y - x\right) \cdot \frac{a - z}{t}\\
\end{array}
\end{array}
if t < -2.6e97Initial program 35.7%
Taylor expanded in t around inf 66.0%
associate--l+66.0%
distribute-lft-out--66.0%
div-sub66.0%
mul-1-neg66.0%
unsub-neg66.0%
div-sub66.0%
associate-/l*79.0%
associate-/l*87.4%
distribute-rgt-out--87.4%
Simplified87.4%
if -2.6e97 < t < 7.9999999999999999e53Initial program 83.3%
+-commutative83.3%
associate-/l*94.1%
fma-define94.0%
Simplified94.0%
if 7.9999999999999999e53 < t Initial program 41.1%
+-commutative41.1%
associate-/l*60.0%
fma-define60.0%
Simplified60.0%
clear-num59.9%
inv-pow59.9%
Applied egg-rr59.9%
unpow-159.9%
Simplified59.9%
Taylor expanded in t around inf 71.7%
associate--l+71.7%
associate-*r/71.7%
associate-*r/71.7%
mul-1-neg71.7%
distribute-lft-neg-out71.7%
div-sub71.7%
distribute-lft-neg-out71.7%
mul-1-neg71.7%
distribute-lft-out--71.7%
distribute-rgt-out--71.7%
associate-*r/71.7%
distribute-rgt-out--71.7%
Simplified85.4%
Final simplification91.5%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ x (* z (/ (- y x) a)))))
(if (<= a -5e-21)
t_1
(if (<= a -6.4e-50)
(* x (/ (- z a) t))
(if (<= a -2.3e-72)
(* z (/ (- y x) (- a t)))
(if (<= a -2.15e-136)
(* y (/ (- z t) (- a t)))
(if (<= a 10500000.0) (+ y (* (/ z t) (- x y))) t_1)))))))
double code(double x, double y, double z, double t, double a) {
double t_1 = x + (z * ((y - x) / a));
double tmp;
if (a <= -5e-21) {
tmp = t_1;
} else if (a <= -6.4e-50) {
tmp = x * ((z - a) / t);
} else if (a <= -2.3e-72) {
tmp = z * ((y - x) / (a - t));
} else if (a <= -2.15e-136) {
tmp = y * ((z - t) / (a - t));
} else if (a <= 10500000.0) {
tmp = y + ((z / t) * (x - y));
} 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 + (z * ((y - x) / a))
if (a <= (-5d-21)) then
tmp = t_1
else if (a <= (-6.4d-50)) then
tmp = x * ((z - a) / t)
else if (a <= (-2.3d-72)) then
tmp = z * ((y - x) / (a - t))
else if (a <= (-2.15d-136)) then
tmp = y * ((z - t) / (a - t))
else if (a <= 10500000.0d0) then
tmp = y + ((z / t) * (x - y))
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 + (z * ((y - x) / a));
double tmp;
if (a <= -5e-21) {
tmp = t_1;
} else if (a <= -6.4e-50) {
tmp = x * ((z - a) / t);
} else if (a <= -2.3e-72) {
tmp = z * ((y - x) / (a - t));
} else if (a <= -2.15e-136) {
tmp = y * ((z - t) / (a - t));
} else if (a <= 10500000.0) {
tmp = y + ((z / t) * (x - y));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = x + (z * ((y - x) / a)) tmp = 0 if a <= -5e-21: tmp = t_1 elif a <= -6.4e-50: tmp = x * ((z - a) / t) elif a <= -2.3e-72: tmp = z * ((y - x) / (a - t)) elif a <= -2.15e-136: tmp = y * ((z - t) / (a - t)) elif a <= 10500000.0: tmp = y + ((z / t) * (x - y)) else: tmp = t_1 return tmp
function code(x, y, z, t, a) t_1 = Float64(x + Float64(z * Float64(Float64(y - x) / a))) tmp = 0.0 if (a <= -5e-21) tmp = t_1; elseif (a <= -6.4e-50) tmp = Float64(x * Float64(Float64(z - a) / t)); elseif (a <= -2.3e-72) tmp = Float64(z * Float64(Float64(y - x) / Float64(a - t))); elseif (a <= -2.15e-136) tmp = Float64(y * Float64(Float64(z - t) / Float64(a - t))); elseif (a <= 10500000.0) tmp = Float64(y + Float64(Float64(z / t) * Float64(x - y))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = x + (z * ((y - x) / a)); tmp = 0.0; if (a <= -5e-21) tmp = t_1; elseif (a <= -6.4e-50) tmp = x * ((z - a) / t); elseif (a <= -2.3e-72) tmp = z * ((y - x) / (a - t)); elseif (a <= -2.15e-136) tmp = y * ((z - t) / (a - t)); elseif (a <= 10500000.0) tmp = y + ((z / t) * (x - y)); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(x + N[(z * N[(N[(y - x), $MachinePrecision] / a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -5e-21], t$95$1, If[LessEqual[a, -6.4e-50], N[(x * N[(N[(z - a), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, -2.3e-72], N[(z * N[(N[(y - x), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, -2.15e-136], N[(y * N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 10500000.0], N[(y + N[(N[(z / t), $MachinePrecision] * N[(x - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + z \cdot \frac{y - x}{a}\\
\mathbf{if}\;a \leq -5 \cdot 10^{-21}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq -6.4 \cdot 10^{-50}:\\
\;\;\;\;x \cdot \frac{z - a}{t}\\
\mathbf{elif}\;a \leq -2.3 \cdot 10^{-72}:\\
\;\;\;\;z \cdot \frac{y - x}{a - t}\\
\mathbf{elif}\;a \leq -2.15 \cdot 10^{-136}:\\
\;\;\;\;y \cdot \frac{z - t}{a - t}\\
\mathbf{elif}\;a \leq 10500000:\\
\;\;\;\;y + \frac{z}{t} \cdot \left(x - y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if a < -4.99999999999999973e-21 or 1.05e7 < a Initial program 72.1%
Taylor expanded in t around 0 65.7%
associate-/l*74.9%
Simplified74.9%
if -4.99999999999999973e-21 < a < -6.4e-50Initial program 51.9%
+-commutative51.9%
associate-/l*51.5%
fma-define51.5%
Simplified51.5%
clear-num51.5%
inv-pow51.5%
Applied egg-rr51.5%
unpow-151.5%
Simplified51.5%
Taylor expanded in t around inf 84.1%
associate--l+84.1%
associate-*r/84.1%
associate-*r/84.1%
mul-1-neg84.1%
distribute-lft-neg-out84.1%
div-sub84.1%
distribute-lft-neg-out84.1%
mul-1-neg84.1%
distribute-lft-out--84.1%
distribute-rgt-out--84.1%
associate-*r/84.1%
distribute-rgt-out--84.1%
Simplified99.5%
Taylor expanded in y around 0 84.1%
associate-/l*99.5%
Simplified99.5%
if -6.4e-50 < a < -2.29999999999999995e-72Initial program 99.2%
+-commutative99.2%
associate-/l*100.0%
fma-define100.0%
Simplified100.0%
clear-num100.0%
inv-pow100.0%
Applied egg-rr100.0%
unpow-1100.0%
Simplified100.0%
Taylor expanded in z around inf 100.0%
div-sub100.0%
Simplified100.0%
if -2.29999999999999995e-72 < a < -2.15e-136Initial program 80.0%
+-commutative80.0%
associate-/l*83.7%
fma-define83.7%
Simplified83.7%
clear-num83.7%
inv-pow83.7%
Applied egg-rr83.7%
unpow-183.7%
Simplified83.7%
Taylor expanded in y around inf 75.2%
div-sub75.3%
Simplified75.3%
if -2.15e-136 < a < 1.05e7Initial program 60.3%
+-commutative60.3%
associate-/l*72.8%
fma-define72.8%
Simplified72.8%
clear-num72.7%
inv-pow72.7%
Applied egg-rr72.7%
unpow-172.7%
Simplified72.7%
Taylor expanded in t around inf 80.2%
associate--l+80.2%
associate-*r/80.2%
associate-*r/80.2%
mul-1-neg80.2%
distribute-lft-neg-out80.2%
div-sub81.3%
distribute-lft-neg-out81.3%
mul-1-neg81.3%
distribute-lft-out--81.3%
distribute-rgt-out--81.3%
associate-*r/81.3%
distribute-rgt-out--81.3%
Simplified87.3%
Taylor expanded in z around inf 84.7%
Final simplification79.5%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ x (* y (/ (- z t) (- a t))))))
(if (<= a -1.2e-20)
t_1
(if (<= a -1.65e-102)
(+ y (* (/ (- y x) t) (- a z)))
(if (<= a -8.5e-135)
(/ y (/ (- a t) (- z t)))
(if (<= a 2.5e+96) (+ y (* (- y x) (/ (- a z) t))) t_1))))))
double code(double x, double y, double z, double t, double a) {
double t_1 = x + (y * ((z - t) / (a - t)));
double tmp;
if (a <= -1.2e-20) {
tmp = t_1;
} else if (a <= -1.65e-102) {
tmp = y + (((y - x) / t) * (a - z));
} else if (a <= -8.5e-135) {
tmp = y / ((a - t) / (z - t));
} else if (a <= 2.5e+96) {
tmp = y + ((y - x) * ((a - z) / 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 * ((z - t) / (a - t)))
if (a <= (-1.2d-20)) then
tmp = t_1
else if (a <= (-1.65d-102)) then
tmp = y + (((y - x) / t) * (a - z))
else if (a <= (-8.5d-135)) then
tmp = y / ((a - t) / (z - t))
else if (a <= 2.5d+96) then
tmp = y + ((y - x) * ((a - 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 a) {
double t_1 = x + (y * ((z - t) / (a - t)));
double tmp;
if (a <= -1.2e-20) {
tmp = t_1;
} else if (a <= -1.65e-102) {
tmp = y + (((y - x) / t) * (a - z));
} else if (a <= -8.5e-135) {
tmp = y / ((a - t) / (z - t));
} else if (a <= 2.5e+96) {
tmp = y + ((y - x) * ((a - z) / t));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = x + (y * ((z - t) / (a - t))) tmp = 0 if a <= -1.2e-20: tmp = t_1 elif a <= -1.65e-102: tmp = y + (((y - x) / t) * (a - z)) elif a <= -8.5e-135: tmp = y / ((a - t) / (z - t)) elif a <= 2.5e+96: tmp = y + ((y - x) * ((a - z) / t)) else: tmp = t_1 return tmp
function code(x, y, z, t, a) t_1 = Float64(x + Float64(y * Float64(Float64(z - t) / Float64(a - t)))) tmp = 0.0 if (a <= -1.2e-20) tmp = t_1; elseif (a <= -1.65e-102) tmp = Float64(y + Float64(Float64(Float64(y - x) / t) * Float64(a - z))); elseif (a <= -8.5e-135) tmp = Float64(y / Float64(Float64(a - t) / Float64(z - t))); elseif (a <= 2.5e+96) tmp = Float64(y + Float64(Float64(y - x) * Float64(Float64(a - z) / t))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = x + (y * ((z - t) / (a - t))); tmp = 0.0; if (a <= -1.2e-20) tmp = t_1; elseif (a <= -1.65e-102) tmp = y + (((y - x) / t) * (a - z)); elseif (a <= -8.5e-135) tmp = y / ((a - t) / (z - t)); elseif (a <= 2.5e+96) tmp = y + ((y - x) * ((a - z) / 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[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -1.2e-20], t$95$1, If[LessEqual[a, -1.65e-102], N[(y + N[(N[(N[(y - x), $MachinePrecision] / t), $MachinePrecision] * N[(a - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, -8.5e-135], N[(y / N[(N[(a - t), $MachinePrecision] / N[(z - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 2.5e+96], N[(y + N[(N[(y - x), $MachinePrecision] * N[(N[(a - z), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + y \cdot \frac{z - t}{a - t}\\
\mathbf{if}\;a \leq -1.2 \cdot 10^{-20}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq -1.65 \cdot 10^{-102}:\\
\;\;\;\;y + \frac{y - x}{t} \cdot \left(a - z\right)\\
\mathbf{elif}\;a \leq -8.5 \cdot 10^{-135}:\\
\;\;\;\;\frac{y}{\frac{a - t}{z - t}}\\
\mathbf{elif}\;a \leq 2.5 \cdot 10^{+96}:\\
\;\;\;\;y + \left(y - x\right) \cdot \frac{a - z}{t}\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if a < -1.19999999999999996e-20 or 2.5000000000000002e96 < a Initial program 73.9%
Taylor expanded in y around inf 77.4%
associate-/l*85.9%
Simplified85.9%
if -1.19999999999999996e-20 < a < -1.65e-102Initial program 73.5%
Taylor expanded in t around inf 77.5%
associate--l+77.5%
distribute-lft-out--77.5%
div-sub82.0%
mul-1-neg82.0%
unsub-neg82.0%
div-sub77.5%
associate-/l*81.6%
associate-/l*81.5%
distribute-rgt-out--86.3%
Simplified86.3%
if -1.65e-102 < a < -8.49999999999999942e-135Initial program 85.4%
+-commutative85.4%
associate-/l*92.3%
fma-define92.3%
Simplified92.3%
clear-num92.3%
inv-pow92.3%
Applied egg-rr92.3%
unpow-192.3%
Simplified92.3%
Taylor expanded in y around -inf 69.7%
associate-/l*84.2%
clear-num84.2%
div-inv84.2%
add-cube-cbrt83.2%
*-un-lft-identity83.2%
times-frac83.2%
pow283.2%
Applied egg-rr83.2%
/-rgt-identity83.2%
associate-*r/83.2%
unpow283.2%
rem-3cbrt-lft84.2%
Simplified84.2%
if -8.49999999999999942e-135 < a < 2.5000000000000002e96Initial program 60.4%
+-commutative60.4%
associate-/l*74.4%
fma-define74.4%
Simplified74.4%
clear-num74.3%
inv-pow74.3%
Applied egg-rr74.3%
unpow-174.3%
Simplified74.3%
Taylor expanded in t around inf 74.4%
associate--l+74.4%
associate-*r/74.4%
associate-*r/74.4%
mul-1-neg74.4%
distribute-lft-neg-out74.4%
div-sub75.3%
distribute-lft-neg-out75.3%
mul-1-neg75.3%
distribute-lft-out--75.3%
distribute-rgt-out--75.3%
associate-*r/75.3%
distribute-rgt-out--75.3%
Simplified82.1%
Final simplification84.2%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ y (* (- y x) (/ (- a z) t))))
(t_2 (+ x (* y (/ (- z t) (- a t))))))
(if (<= a -5.2e-21)
t_2
(if (<= a -6.8e-102)
t_1
(if (<= a -1.02e-134)
(/ y (/ (- a t) (- z t)))
(if (<= a 2.5e+96) t_1 t_2))))))
double code(double x, double y, double z, double t, double a) {
double t_1 = y + ((y - x) * ((a - z) / t));
double t_2 = x + (y * ((z - t) / (a - t)));
double tmp;
if (a <= -5.2e-21) {
tmp = t_2;
} else if (a <= -6.8e-102) {
tmp = t_1;
} else if (a <= -1.02e-134) {
tmp = y / ((a - t) / (z - t));
} else if (a <= 2.5e+96) {
tmp = t_1;
} else {
tmp = t_2;
}
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) :: t_2
real(8) :: tmp
t_1 = y + ((y - x) * ((a - z) / t))
t_2 = x + (y * ((z - t) / (a - t)))
if (a <= (-5.2d-21)) then
tmp = t_2
else if (a <= (-6.8d-102)) then
tmp = t_1
else if (a <= (-1.02d-134)) then
tmp = y / ((a - t) / (z - t))
else if (a <= 2.5d+96) then
tmp = t_1
else
tmp = t_2
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double t_1 = y + ((y - x) * ((a - z) / t));
double t_2 = x + (y * ((z - t) / (a - t)));
double tmp;
if (a <= -5.2e-21) {
tmp = t_2;
} else if (a <= -6.8e-102) {
tmp = t_1;
} else if (a <= -1.02e-134) {
tmp = y / ((a - t) / (z - t));
} else if (a <= 2.5e+96) {
tmp = t_1;
} else {
tmp = t_2;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = y + ((y - x) * ((a - z) / t)) t_2 = x + (y * ((z - t) / (a - t))) tmp = 0 if a <= -5.2e-21: tmp = t_2 elif a <= -6.8e-102: tmp = t_1 elif a <= -1.02e-134: tmp = y / ((a - t) / (z - t)) elif a <= 2.5e+96: tmp = t_1 else: tmp = t_2 return tmp
function code(x, y, z, t, a) t_1 = Float64(y + Float64(Float64(y - x) * Float64(Float64(a - z) / t))) t_2 = Float64(x + Float64(y * Float64(Float64(z - t) / Float64(a - t)))) tmp = 0.0 if (a <= -5.2e-21) tmp = t_2; elseif (a <= -6.8e-102) tmp = t_1; elseif (a <= -1.02e-134) tmp = Float64(y / Float64(Float64(a - t) / Float64(z - t))); elseif (a <= 2.5e+96) tmp = t_1; else tmp = t_2; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = y + ((y - x) * ((a - z) / t)); t_2 = x + (y * ((z - t) / (a - t))); tmp = 0.0; if (a <= -5.2e-21) tmp = t_2; elseif (a <= -6.8e-102) tmp = t_1; elseif (a <= -1.02e-134) tmp = y / ((a - t) / (z - t)); elseif (a <= 2.5e+96) tmp = t_1; else tmp = t_2; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(y + N[(N[(y - x), $MachinePrecision] * N[(N[(a - z), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(x + N[(y * N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -5.2e-21], t$95$2, If[LessEqual[a, -6.8e-102], t$95$1, If[LessEqual[a, -1.02e-134], N[(y / N[(N[(a - t), $MachinePrecision] / N[(z - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 2.5e+96], t$95$1, t$95$2]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := y + \left(y - x\right) \cdot \frac{a - z}{t}\\
t_2 := x + y \cdot \frac{z - t}{a - t}\\
\mathbf{if}\;a \leq -5.2 \cdot 10^{-21}:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;a \leq -6.8 \cdot 10^{-102}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq -1.02 \cdot 10^{-134}:\\
\;\;\;\;\frac{y}{\frac{a - t}{z - t}}\\
\mathbf{elif}\;a \leq 2.5 \cdot 10^{+96}:\\
\;\;\;\;t\_1\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if a < -5.20000000000000035e-21 or 2.5000000000000002e96 < a Initial program 73.9%
Taylor expanded in y around inf 77.4%
associate-/l*85.9%
Simplified85.9%
if -5.20000000000000035e-21 < a < -6.80000000000000026e-102 or -1.02e-134 < a < 2.5000000000000002e96Initial program 62.7%
+-commutative62.7%
associate-/l*74.2%
fma-define74.2%
Simplified74.2%
clear-num74.1%
inv-pow74.1%
Applied egg-rr74.1%
unpow-174.1%
Simplified74.1%
Taylor expanded in t around inf 74.9%
associate--l+74.9%
associate-*r/74.9%
associate-*r/74.9%
mul-1-neg74.9%
distribute-lft-neg-out74.9%
div-sub76.5%
distribute-lft-neg-out76.5%
mul-1-neg76.5%
distribute-lft-out--76.5%
distribute-rgt-out--76.5%
associate-*r/76.5%
distribute-rgt-out--76.5%
Simplified82.8%
if -6.80000000000000026e-102 < a < -1.02e-134Initial program 85.4%
+-commutative85.4%
associate-/l*92.3%
fma-define92.3%
Simplified92.3%
clear-num92.3%
inv-pow92.3%
Applied egg-rr92.3%
unpow-192.3%
Simplified92.3%
Taylor expanded in y around -inf 69.7%
associate-/l*84.2%
clear-num84.2%
div-inv84.2%
add-cube-cbrt83.2%
*-un-lft-identity83.2%
times-frac83.2%
pow283.2%
Applied egg-rr83.2%
/-rgt-identity83.2%
associate-*r/83.2%
unpow283.2%
rem-3cbrt-lft84.2%
Simplified84.2%
Final simplification84.2%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (* y (/ (- z t) (- a t)))) (t_2 (+ x t_1)))
(if (<= a -1.8e-23)
t_2
(if (<= a -1.2e-72)
(* z (/ (- y x) (- a t)))
(if (<= a -1.12e-135)
t_1
(if (<= a 1.45e-55) (+ y (* (/ z t) (- x y))) t_2))))))
double code(double x, double y, double z, double t, double a) {
double t_1 = y * ((z - t) / (a - t));
double t_2 = x + t_1;
double tmp;
if (a <= -1.8e-23) {
tmp = t_2;
} else if (a <= -1.2e-72) {
tmp = z * ((y - x) / (a - t));
} else if (a <= -1.12e-135) {
tmp = t_1;
} else if (a <= 1.45e-55) {
tmp = y + ((z / t) * (x - y));
} else {
tmp = t_2;
}
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) :: t_2
real(8) :: tmp
t_1 = y * ((z - t) / (a - t))
t_2 = x + t_1
if (a <= (-1.8d-23)) then
tmp = t_2
else if (a <= (-1.2d-72)) then
tmp = z * ((y - x) / (a - t))
else if (a <= (-1.12d-135)) then
tmp = t_1
else if (a <= 1.45d-55) then
tmp = y + ((z / t) * (x - y))
else
tmp = t_2
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 - t) / (a - t));
double t_2 = x + t_1;
double tmp;
if (a <= -1.8e-23) {
tmp = t_2;
} else if (a <= -1.2e-72) {
tmp = z * ((y - x) / (a - t));
} else if (a <= -1.12e-135) {
tmp = t_1;
} else if (a <= 1.45e-55) {
tmp = y + ((z / t) * (x - y));
} else {
tmp = t_2;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = y * ((z - t) / (a - t)) t_2 = x + t_1 tmp = 0 if a <= -1.8e-23: tmp = t_2 elif a <= -1.2e-72: tmp = z * ((y - x) / (a - t)) elif a <= -1.12e-135: tmp = t_1 elif a <= 1.45e-55: tmp = y + ((z / t) * (x - y)) else: tmp = t_2 return tmp
function code(x, y, z, t, a) t_1 = Float64(y * Float64(Float64(z - t) / Float64(a - t))) t_2 = Float64(x + t_1) tmp = 0.0 if (a <= -1.8e-23) tmp = t_2; elseif (a <= -1.2e-72) tmp = Float64(z * Float64(Float64(y - x) / Float64(a - t))); elseif (a <= -1.12e-135) tmp = t_1; elseif (a <= 1.45e-55) tmp = Float64(y + Float64(Float64(z / t) * Float64(x - y))); else tmp = t_2; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = y * ((z - t) / (a - t)); t_2 = x + t_1; tmp = 0.0; if (a <= -1.8e-23) tmp = t_2; elseif (a <= -1.2e-72) tmp = z * ((y - x) / (a - t)); elseif (a <= -1.12e-135) tmp = t_1; elseif (a <= 1.45e-55) tmp = y + ((z / t) * (x - y)); else tmp = t_2; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(y * N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(x + t$95$1), $MachinePrecision]}, If[LessEqual[a, -1.8e-23], t$95$2, If[LessEqual[a, -1.2e-72], N[(z * N[(N[(y - x), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, -1.12e-135], t$95$1, If[LessEqual[a, 1.45e-55], N[(y + N[(N[(z / t), $MachinePrecision] * N[(x - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$2]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := y \cdot \frac{z - t}{a - t}\\
t_2 := x + t\_1\\
\mathbf{if}\;a \leq -1.8 \cdot 10^{-23}:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;a \leq -1.2 \cdot 10^{-72}:\\
\;\;\;\;z \cdot \frac{y - x}{a - t}\\
\mathbf{elif}\;a \leq -1.12 \cdot 10^{-135}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq 1.45 \cdot 10^{-55}:\\
\;\;\;\;y + \frac{z}{t} \cdot \left(x - y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if a < -1.7999999999999999e-23 or 1.45e-55 < a Initial program 70.7%
Taylor expanded in y around inf 70.3%
associate-/l*78.9%
Simplified78.9%
if -1.7999999999999999e-23 < a < -1.2e-72Initial program 90.1%
+-commutative90.1%
associate-/l*90.2%
fma-define90.2%
Simplified90.2%
clear-num90.2%
inv-pow90.2%
Applied egg-rr90.2%
unpow-190.2%
Simplified90.2%
Taylor expanded in z around inf 99.8%
div-sub99.8%
Simplified99.8%
if -1.2e-72 < a < -1.12e-135Initial program 80.0%
+-commutative80.0%
associate-/l*83.7%
fma-define83.7%
Simplified83.7%
clear-num83.7%
inv-pow83.7%
Applied egg-rr83.7%
unpow-183.7%
Simplified83.7%
Taylor expanded in y around inf 75.2%
div-sub75.3%
Simplified75.3%
if -1.12e-135 < a < 1.45e-55Initial program 59.3%
+-commutative59.3%
associate-/l*71.5%
fma-define71.4%
Simplified71.4%
clear-num71.3%
inv-pow71.3%
Applied egg-rr71.3%
unpow-171.3%
Simplified71.3%
Taylor expanded in t around inf 84.3%
associate--l+84.3%
associate-*r/84.3%
associate-*r/84.3%
mul-1-neg84.3%
distribute-lft-neg-out84.3%
div-sub85.6%
distribute-lft-neg-out85.6%
mul-1-neg85.6%
distribute-lft-out--85.6%
distribute-rgt-out--85.6%
associate-*r/85.6%
distribute-rgt-out--85.6%
Simplified90.3%
Taylor expanded in z around inf 88.6%
Final simplification82.4%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ x (* z (/ (- y x) a)))))
(if (<= a -2.25e-20)
t_1
(if (<= a -9.8e-51)
(* x (/ (- z a) t))
(if (<= a -2.8e-72)
(* z (/ (- y x) (- a t)))
(if (<= a 0.00125) (* y (/ (- z t) (- a t))) t_1))))))
double code(double x, double y, double z, double t, double a) {
double t_1 = x + (z * ((y - x) / a));
double tmp;
if (a <= -2.25e-20) {
tmp = t_1;
} else if (a <= -9.8e-51) {
tmp = x * ((z - a) / t);
} else if (a <= -2.8e-72) {
tmp = z * ((y - x) / (a - t));
} else if (a <= 0.00125) {
tmp = y * ((z - t) / (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 + (z * ((y - x) / a))
if (a <= (-2.25d-20)) then
tmp = t_1
else if (a <= (-9.8d-51)) then
tmp = x * ((z - a) / t)
else if (a <= (-2.8d-72)) then
tmp = z * ((y - x) / (a - t))
else if (a <= 0.00125d0) then
tmp = y * ((z - t) / (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 + (z * ((y - x) / a));
double tmp;
if (a <= -2.25e-20) {
tmp = t_1;
} else if (a <= -9.8e-51) {
tmp = x * ((z - a) / t);
} else if (a <= -2.8e-72) {
tmp = z * ((y - x) / (a - t));
} else if (a <= 0.00125) {
tmp = y * ((z - t) / (a - t));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = x + (z * ((y - x) / a)) tmp = 0 if a <= -2.25e-20: tmp = t_1 elif a <= -9.8e-51: tmp = x * ((z - a) / t) elif a <= -2.8e-72: tmp = z * ((y - x) / (a - t)) elif a <= 0.00125: tmp = y * ((z - t) / (a - t)) else: tmp = t_1 return tmp
function code(x, y, z, t, a) t_1 = Float64(x + Float64(z * Float64(Float64(y - x) / a))) tmp = 0.0 if (a <= -2.25e-20) tmp = t_1; elseif (a <= -9.8e-51) tmp = Float64(x * Float64(Float64(z - a) / t)); elseif (a <= -2.8e-72) tmp = Float64(z * Float64(Float64(y - x) / Float64(a - t))); elseif (a <= 0.00125) tmp = Float64(y * Float64(Float64(z - t) / Float64(a - t))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = x + (z * ((y - x) / a)); tmp = 0.0; if (a <= -2.25e-20) tmp = t_1; elseif (a <= -9.8e-51) tmp = x * ((z - a) / t); elseif (a <= -2.8e-72) tmp = z * ((y - x) / (a - t)); elseif (a <= 0.00125) tmp = y * ((z - t) / (a - t)); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(x + N[(z * N[(N[(y - x), $MachinePrecision] / a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -2.25e-20], t$95$1, If[LessEqual[a, -9.8e-51], N[(x * N[(N[(z - a), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, -2.8e-72], N[(z * N[(N[(y - x), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 0.00125], N[(y * N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + z \cdot \frac{y - x}{a}\\
\mathbf{if}\;a \leq -2.25 \cdot 10^{-20}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq -9.8 \cdot 10^{-51}:\\
\;\;\;\;x \cdot \frac{z - a}{t}\\
\mathbf{elif}\;a \leq -2.8 \cdot 10^{-72}:\\
\;\;\;\;z \cdot \frac{y - x}{a - t}\\
\mathbf{elif}\;a \leq 0.00125:\\
\;\;\;\;y \cdot \frac{z - t}{a - t}\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if a < -2.2500000000000001e-20 or 0.00125000000000000003 < a Initial program 71.4%
Taylor expanded in t around 0 65.0%
associate-/l*74.0%
Simplified74.0%
if -2.2500000000000001e-20 < a < -9.79999999999999948e-51Initial program 51.9%
+-commutative51.9%
associate-/l*51.5%
fma-define51.5%
Simplified51.5%
clear-num51.5%
inv-pow51.5%
Applied egg-rr51.5%
unpow-151.5%
Simplified51.5%
Taylor expanded in t around inf 84.1%
associate--l+84.1%
associate-*r/84.1%
associate-*r/84.1%
mul-1-neg84.1%
distribute-lft-neg-out84.1%
div-sub84.1%
distribute-lft-neg-out84.1%
mul-1-neg84.1%
distribute-lft-out--84.1%
distribute-rgt-out--84.1%
associate-*r/84.1%
distribute-rgt-out--84.1%
Simplified99.5%
Taylor expanded in y around 0 84.1%
associate-/l*99.5%
Simplified99.5%
if -9.79999999999999948e-51 < a < -2.7999999999999998e-72Initial program 99.2%
+-commutative99.2%
associate-/l*100.0%
fma-define100.0%
Simplified100.0%
clear-num100.0%
inv-pow100.0%
Applied egg-rr100.0%
unpow-1100.0%
Simplified100.0%
Taylor expanded in z around inf 100.0%
div-sub100.0%
Simplified100.0%
if -2.7999999999999998e-72 < a < 0.00125000000000000003Initial program 65.1%
+-commutative65.1%
associate-/l*75.3%
fma-define75.3%
Simplified75.3%
clear-num75.2%
inv-pow75.2%
Applied egg-rr75.2%
unpow-175.2%
Simplified75.2%
Taylor expanded in y around inf 72.1%
div-sub72.2%
Simplified72.2%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (* z (/ (- y x) (- a t)))) (t_2 (+ x (* y (/ z a)))))
(if (<= a -4e-7)
t_2
(if (<= a -1.6e-72)
t_1
(if (<= a 15.0)
(* y (/ (- z t) (- a t)))
(if (<= a 2.6e+111) t_1 t_2))))))
double code(double x, double y, double z, double t, double a) {
double t_1 = z * ((y - x) / (a - t));
double t_2 = x + (y * (z / a));
double tmp;
if (a <= -4e-7) {
tmp = t_2;
} else if (a <= -1.6e-72) {
tmp = t_1;
} else if (a <= 15.0) {
tmp = y * ((z - t) / (a - t));
} else if (a <= 2.6e+111) {
tmp = t_1;
} else {
tmp = t_2;
}
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) :: t_2
real(8) :: tmp
t_1 = z * ((y - x) / (a - t))
t_2 = x + (y * (z / a))
if (a <= (-4d-7)) then
tmp = t_2
else if (a <= (-1.6d-72)) then
tmp = t_1
else if (a <= 15.0d0) then
tmp = y * ((z - t) / (a - t))
else if (a <= 2.6d+111) then
tmp = t_1
else
tmp = t_2
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double t_1 = z * ((y - x) / (a - t));
double t_2 = x + (y * (z / a));
double tmp;
if (a <= -4e-7) {
tmp = t_2;
} else if (a <= -1.6e-72) {
tmp = t_1;
} else if (a <= 15.0) {
tmp = y * ((z - t) / (a - t));
} else if (a <= 2.6e+111) {
tmp = t_1;
} else {
tmp = t_2;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = z * ((y - x) / (a - t)) t_2 = x + (y * (z / a)) tmp = 0 if a <= -4e-7: tmp = t_2 elif a <= -1.6e-72: tmp = t_1 elif a <= 15.0: tmp = y * ((z - t) / (a - t)) elif a <= 2.6e+111: tmp = t_1 else: tmp = t_2 return tmp
function code(x, y, z, t, a) t_1 = Float64(z * Float64(Float64(y - x) / Float64(a - t))) t_2 = Float64(x + Float64(y * Float64(z / a))) tmp = 0.0 if (a <= -4e-7) tmp = t_2; elseif (a <= -1.6e-72) tmp = t_1; elseif (a <= 15.0) tmp = Float64(y * Float64(Float64(z - t) / Float64(a - t))); elseif (a <= 2.6e+111) tmp = t_1; else tmp = t_2; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = z * ((y - x) / (a - t)); t_2 = x + (y * (z / a)); tmp = 0.0; if (a <= -4e-7) tmp = t_2; elseif (a <= -1.6e-72) tmp = t_1; elseif (a <= 15.0) tmp = y * ((z - t) / (a - t)); elseif (a <= 2.6e+111) tmp = t_1; else tmp = t_2; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(z * N[(N[(y - x), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(x + N[(y * N[(z / a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -4e-7], t$95$2, If[LessEqual[a, -1.6e-72], t$95$1, If[LessEqual[a, 15.0], N[(y * N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 2.6e+111], t$95$1, t$95$2]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := z \cdot \frac{y - x}{a - t}\\
t_2 := x + y \cdot \frac{z}{a}\\
\mathbf{if}\;a \leq -4 \cdot 10^{-7}:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;a \leq -1.6 \cdot 10^{-72}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq 15:\\
\;\;\;\;y \cdot \frac{z - t}{a - t}\\
\mathbf{elif}\;a \leq 2.6 \cdot 10^{+111}:\\
\;\;\;\;t\_1\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if a < -3.9999999999999998e-7 or 2.5999999999999999e111 < a Initial program 74.5%
Taylor expanded in t around 0 70.2%
Taylor expanded in y around inf 72.8%
associate-/l*77.4%
Simplified77.4%
if -3.9999999999999998e-7 < a < -1.6e-72 or 15 < a < 2.5999999999999999e111Initial program 65.2%
+-commutative65.2%
associate-/l*79.3%
fma-define79.3%
Simplified79.3%
clear-num79.3%
inv-pow79.3%
Applied egg-rr79.3%
unpow-179.3%
Simplified79.3%
Taylor expanded in z around inf 64.6%
div-sub64.6%
Simplified64.6%
if -1.6e-72 < a < 15Initial program 64.8%
+-commutative64.8%
associate-/l*74.9%
fma-define74.9%
Simplified74.9%
clear-num74.8%
inv-pow74.8%
Applied egg-rr74.8%
unpow-174.8%
Simplified74.8%
Taylor expanded in y around inf 71.8%
div-sub71.8%
Simplified71.8%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ x (* y (/ z a)))))
(if (<= a -3.2e-20)
t_1
(if (<= a -4e-52)
(* x (/ (- z a) t))
(if (<= a -1.2e-72)
(* (- y x) (/ z a))
(if (<= a 0.00156) (* y (- 1.0 (/ z t))) t_1))))))
double code(double x, double y, double z, double t, double a) {
double t_1 = x + (y * (z / a));
double tmp;
if (a <= -3.2e-20) {
tmp = t_1;
} else if (a <= -4e-52) {
tmp = x * ((z - a) / t);
} else if (a <= -1.2e-72) {
tmp = (y - x) * (z / a);
} else if (a <= 0.00156) {
tmp = y * (1.0 - (z / 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 * (z / a))
if (a <= (-3.2d-20)) then
tmp = t_1
else if (a <= (-4d-52)) then
tmp = x * ((z - a) / t)
else if (a <= (-1.2d-72)) then
tmp = (y - x) * (z / a)
else if (a <= 0.00156d0) then
tmp = y * (1.0d0 - (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 a) {
double t_1 = x + (y * (z / a));
double tmp;
if (a <= -3.2e-20) {
tmp = t_1;
} else if (a <= -4e-52) {
tmp = x * ((z - a) / t);
} else if (a <= -1.2e-72) {
tmp = (y - x) * (z / a);
} else if (a <= 0.00156) {
tmp = y * (1.0 - (z / t));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = x + (y * (z / a)) tmp = 0 if a <= -3.2e-20: tmp = t_1 elif a <= -4e-52: tmp = x * ((z - a) / t) elif a <= -1.2e-72: tmp = (y - x) * (z / a) elif a <= 0.00156: tmp = y * (1.0 - (z / t)) else: tmp = t_1 return tmp
function code(x, y, z, t, a) t_1 = Float64(x + Float64(y * Float64(z / a))) tmp = 0.0 if (a <= -3.2e-20) tmp = t_1; elseif (a <= -4e-52) tmp = Float64(x * Float64(Float64(z - a) / t)); elseif (a <= -1.2e-72) tmp = Float64(Float64(y - x) * Float64(z / a)); elseif (a <= 0.00156) tmp = Float64(y * Float64(1.0 - Float64(z / t))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = x + (y * (z / a)); tmp = 0.0; if (a <= -3.2e-20) tmp = t_1; elseif (a <= -4e-52) tmp = x * ((z - a) / t); elseif (a <= -1.2e-72) tmp = (y - x) * (z / a); elseif (a <= 0.00156) tmp = y * (1.0 - (z / 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[(z / a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -3.2e-20], t$95$1, If[LessEqual[a, -4e-52], N[(x * N[(N[(z - a), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, -1.2e-72], N[(N[(y - x), $MachinePrecision] * N[(z / a), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 0.00156], N[(y * N[(1.0 - N[(z / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + y \cdot \frac{z}{a}\\
\mathbf{if}\;a \leq -3.2 \cdot 10^{-20}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq -4 \cdot 10^{-52}:\\
\;\;\;\;x \cdot \frac{z - a}{t}\\
\mathbf{elif}\;a \leq -1.2 \cdot 10^{-72}:\\
\;\;\;\;\left(y - x\right) \cdot \frac{z}{a}\\
\mathbf{elif}\;a \leq 0.00156:\\
\;\;\;\;y \cdot \left(1 - \frac{z}{t}\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if a < -3.1999999999999997e-20 or 0.00155999999999999997 < a Initial program 71.4%
Taylor expanded in t around 0 65.0%
Taylor expanded in y around inf 64.0%
associate-/l*68.3%
Simplified68.3%
if -3.1999999999999997e-20 < a < -4e-52Initial program 51.9%
+-commutative51.9%
associate-/l*51.5%
fma-define51.5%
Simplified51.5%
clear-num51.5%
inv-pow51.5%
Applied egg-rr51.5%
unpow-151.5%
Simplified51.5%
Taylor expanded in t around inf 84.1%
associate--l+84.1%
associate-*r/84.1%
associate-*r/84.1%
mul-1-neg84.1%
distribute-lft-neg-out84.1%
div-sub84.1%
distribute-lft-neg-out84.1%
mul-1-neg84.1%
distribute-lft-out--84.1%
distribute-rgt-out--84.1%
associate-*r/84.1%
distribute-rgt-out--84.1%
Simplified99.5%
Taylor expanded in y around 0 84.1%
associate-/l*99.5%
Simplified99.5%
if -4e-52 < a < -1.2e-72Initial program 99.2%
Taylor expanded in t around 0 82.9%
Taylor expanded in z around inf 83.4%
div-sub83.4%
associate-*r/82.9%
*-commutative82.9%
associate-*r/83.4%
Simplified83.4%
if -1.2e-72 < a < 0.00155999999999999997Initial program 65.1%
Taylor expanded in a around 0 50.4%
mul-1-neg50.4%
unsub-neg50.4%
associate-/l*59.7%
div-sub59.7%
sub-neg59.7%
*-inverses59.7%
metadata-eval59.7%
Simplified59.7%
Taylor expanded in x around 0 63.7%
mul-1-neg63.7%
sub-neg63.7%
metadata-eval63.7%
*-commutative63.7%
distribute-lft-neg-in63.7%
distribute-neg-in63.7%
mul-1-neg63.7%
metadata-eval63.7%
+-commutative63.7%
mul-1-neg63.7%
sub-neg63.7%
*-commutative63.7%
Simplified63.7%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (* x (/ (- z a) t))))
(if (<= a -1.15e-6)
x
(if (<= a -1.7e-77) t_1 (if (<= a 0.0017) y (if (<= a 2.5e+96) t_1 x))))))
double code(double x, double y, double z, double t, double a) {
double t_1 = x * ((z - a) / t);
double tmp;
if (a <= -1.15e-6) {
tmp = x;
} else if (a <= -1.7e-77) {
tmp = t_1;
} else if (a <= 0.0017) {
tmp = y;
} else if (a <= 2.5e+96) {
tmp = t_1;
} 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) :: t_1
real(8) :: tmp
t_1 = x * ((z - a) / t)
if (a <= (-1.15d-6)) then
tmp = x
else if (a <= (-1.7d-77)) then
tmp = t_1
else if (a <= 0.0017d0) then
tmp = y
else if (a <= 2.5d+96) then
tmp = t_1
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double t_1 = x * ((z - a) / t);
double tmp;
if (a <= -1.15e-6) {
tmp = x;
} else if (a <= -1.7e-77) {
tmp = t_1;
} else if (a <= 0.0017) {
tmp = y;
} else if (a <= 2.5e+96) {
tmp = t_1;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = x * ((z - a) / t) tmp = 0 if a <= -1.15e-6: tmp = x elif a <= -1.7e-77: tmp = t_1 elif a <= 0.0017: tmp = y elif a <= 2.5e+96: tmp = t_1 else: tmp = x return tmp
function code(x, y, z, t, a) t_1 = Float64(x * Float64(Float64(z - a) / t)) tmp = 0.0 if (a <= -1.15e-6) tmp = x; elseif (a <= -1.7e-77) tmp = t_1; elseif (a <= 0.0017) tmp = y; elseif (a <= 2.5e+96) tmp = t_1; else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = x * ((z - a) / t); tmp = 0.0; if (a <= -1.15e-6) tmp = x; elseif (a <= -1.7e-77) tmp = t_1; elseif (a <= 0.0017) tmp = y; elseif (a <= 2.5e+96) tmp = t_1; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(x * N[(N[(z - a), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -1.15e-6], x, If[LessEqual[a, -1.7e-77], t$95$1, If[LessEqual[a, 0.0017], y, If[LessEqual[a, 2.5e+96], t$95$1, x]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x \cdot \frac{z - a}{t}\\
\mathbf{if}\;a \leq -1.15 \cdot 10^{-6}:\\
\;\;\;\;x\\
\mathbf{elif}\;a \leq -1.7 \cdot 10^{-77}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq 0.0017:\\
\;\;\;\;y\\
\mathbf{elif}\;a \leq 2.5 \cdot 10^{+96}:\\
\;\;\;\;t\_1\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if a < -1.15e-6 or 2.5000000000000002e96 < a Initial program 73.6%
Taylor expanded in a around inf 61.4%
if -1.15e-6 < a < -1.69999999999999991e-77 or 0.00169999999999999991 < a < 2.5000000000000002e96Initial program 66.9%
+-commutative66.9%
associate-/l*78.8%
fma-define78.8%
Simplified78.8%
clear-num78.8%
inv-pow78.8%
Applied egg-rr78.8%
unpow-178.8%
Simplified78.8%
Taylor expanded in t around inf 53.4%
associate--l+53.4%
associate-*r/53.4%
associate-*r/53.4%
mul-1-neg53.4%
distribute-lft-neg-out53.4%
div-sub56.1%
distribute-lft-neg-out56.1%
mul-1-neg56.1%
distribute-lft-out--56.1%
distribute-rgt-out--56.1%
associate-*r/56.1%
distribute-rgt-out--56.1%
Simplified68.2%
Taylor expanded in y around 0 37.7%
associate-/l*47.0%
Simplified47.0%
if -1.69999999999999991e-77 < a < 0.00169999999999999991Initial program 64.8%
Taylor expanded in t around inf 39.9%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ x (* y (/ z a)))))
(if (<= a -1e-20)
t_1
(if (<= a -6.2e-50)
(* x (/ (- z a) t))
(if (<= a 7e+86) (* y (/ (- z t) (- a t))) t_1)))))
double code(double x, double y, double z, double t, double a) {
double t_1 = x + (y * (z / a));
double tmp;
if (a <= -1e-20) {
tmp = t_1;
} else if (a <= -6.2e-50) {
tmp = x * ((z - a) / t);
} else if (a <= 7e+86) {
tmp = y * ((z - t) / (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 * (z / a))
if (a <= (-1d-20)) then
tmp = t_1
else if (a <= (-6.2d-50)) then
tmp = x * ((z - a) / t)
else if (a <= 7d+86) then
tmp = y * ((z - t) / (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 * (z / a));
double tmp;
if (a <= -1e-20) {
tmp = t_1;
} else if (a <= -6.2e-50) {
tmp = x * ((z - a) / t);
} else if (a <= 7e+86) {
tmp = y * ((z - t) / (a - t));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = x + (y * (z / a)) tmp = 0 if a <= -1e-20: tmp = t_1 elif a <= -6.2e-50: tmp = x * ((z - a) / t) elif a <= 7e+86: tmp = y * ((z - t) / (a - t)) else: tmp = t_1 return tmp
function code(x, y, z, t, a) t_1 = Float64(x + Float64(y * Float64(z / a))) tmp = 0.0 if (a <= -1e-20) tmp = t_1; elseif (a <= -6.2e-50) tmp = Float64(x * Float64(Float64(z - a) / t)); elseif (a <= 7e+86) tmp = Float64(y * Float64(Float64(z - t) / Float64(a - t))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = x + (y * (z / a)); tmp = 0.0; if (a <= -1e-20) tmp = t_1; elseif (a <= -6.2e-50) tmp = x * ((z - a) / t); elseif (a <= 7e+86) tmp = y * ((z - t) / (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[(z / a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -1e-20], t$95$1, If[LessEqual[a, -6.2e-50], N[(x * N[(N[(z - a), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 7e+86], N[(y * N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + y \cdot \frac{z}{a}\\
\mathbf{if}\;a \leq -1 \cdot 10^{-20}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a \leq -6.2 \cdot 10^{-50}:\\
\;\;\;\;x \cdot \frac{z - a}{t}\\
\mathbf{elif}\;a \leq 7 \cdot 10^{+86}:\\
\;\;\;\;y \cdot \frac{z - t}{a - t}\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if a < -9.99999999999999945e-21 or 7.00000000000000038e86 < a Initial program 73.3%
Taylor expanded in t around 0 67.9%
Taylor expanded in y around inf 69.4%
associate-/l*74.3%
Simplified74.3%
if -9.99999999999999945e-21 < a < -6.2000000000000004e-50Initial program 51.9%
+-commutative51.9%
associate-/l*51.5%
fma-define51.5%
Simplified51.5%
clear-num51.5%
inv-pow51.5%
Applied egg-rr51.5%
unpow-151.5%
Simplified51.5%
Taylor expanded in t around inf 84.1%
associate--l+84.1%
associate-*r/84.1%
associate-*r/84.1%
mul-1-neg84.1%
distribute-lft-neg-out84.1%
div-sub84.1%
distribute-lft-neg-out84.1%
mul-1-neg84.1%
distribute-lft-out--84.1%
distribute-rgt-out--84.1%
associate-*r/84.1%
distribute-rgt-out--84.1%
Simplified99.5%
Taylor expanded in y around 0 84.1%
associate-/l*99.5%
Simplified99.5%
if -6.2000000000000004e-50 < a < 7.00000000000000038e86Initial program 65.8%
+-commutative65.8%
associate-/l*77.5%
fma-define77.5%
Simplified77.5%
clear-num77.4%
inv-pow77.4%
Applied egg-rr77.4%
unpow-177.4%
Simplified77.4%
Taylor expanded in y around inf 67.1%
div-sub67.1%
Simplified67.1%
(FPCore (x y z t a)
:precision binary64
(if (<= t -7e+100)
(+ y (* (/ (- y x) t) (- a z)))
(if (<= t 8e+53)
(+ x (/ (- y x) (/ (- a t) (- z t))))
(+ y (* (- y x) (/ (- a z) t))))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (t <= -7e+100) {
tmp = y + (((y - x) / t) * (a - z));
} else if (t <= 8e+53) {
tmp = x + ((y - x) / ((a - t) / (z - t)));
} else {
tmp = y + ((y - x) * ((a - z) / 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 (t <= (-7d+100)) then
tmp = y + (((y - x) / t) * (a - z))
else if (t <= 8d+53) then
tmp = x + ((y - x) / ((a - t) / (z - t)))
else
tmp = y + ((y - x) * ((a - z) / t))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if (t <= -7e+100) {
tmp = y + (((y - x) / t) * (a - z));
} else if (t <= 8e+53) {
tmp = x + ((y - x) / ((a - t) / (z - t)));
} else {
tmp = y + ((y - x) * ((a - z) / t));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if t <= -7e+100: tmp = y + (((y - x) / t) * (a - z)) elif t <= 8e+53: tmp = x + ((y - x) / ((a - t) / (z - t))) else: tmp = y + ((y - x) * ((a - z) / t)) return tmp
function code(x, y, z, t, a) tmp = 0.0 if (t <= -7e+100) tmp = Float64(y + Float64(Float64(Float64(y - x) / t) * Float64(a - z))); elseif (t <= 8e+53) tmp = Float64(x + Float64(Float64(y - x) / Float64(Float64(a - t) / Float64(z - t)))); else tmp = Float64(y + Float64(Float64(y - x) * Float64(Float64(a - z) / t))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (t <= -7e+100) tmp = y + (((y - x) / t) * (a - z)); elseif (t <= 8e+53) tmp = x + ((y - x) / ((a - t) / (z - t))); else tmp = y + ((y - x) * ((a - z) / t)); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[t, -7e+100], N[(y + N[(N[(N[(y - x), $MachinePrecision] / t), $MachinePrecision] * N[(a - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t, 8e+53], N[(x + N[(N[(y - x), $MachinePrecision] / N[(N[(a - t), $MachinePrecision] / N[(z - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(y + N[(N[(y - x), $MachinePrecision] * N[(N[(a - z), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;t \leq -7 \cdot 10^{+100}:\\
\;\;\;\;y + \frac{y - x}{t} \cdot \left(a - z\right)\\
\mathbf{elif}\;t \leq 8 \cdot 10^{+53}:\\
\;\;\;\;x + \frac{y - x}{\frac{a - t}{z - t}}\\
\mathbf{else}:\\
\;\;\;\;y + \left(y - x\right) \cdot \frac{a - z}{t}\\
\end{array}
\end{array}
if t < -6.99999999999999953e100Initial program 35.7%
Taylor expanded in t around inf 66.0%
associate--l+66.0%
distribute-lft-out--66.0%
div-sub66.0%
mul-1-neg66.0%
unsub-neg66.0%
div-sub66.0%
associate-/l*79.0%
associate-/l*87.4%
distribute-rgt-out--87.4%
Simplified87.4%
if -6.99999999999999953e100 < t < 7.9999999999999999e53Initial program 83.3%
clear-num83.2%
inv-pow83.2%
*-commutative83.2%
associate-/r*94.0%
Applied egg-rr94.0%
*-un-lft-identity94.0%
unpow-194.0%
clear-num94.0%
Applied egg-rr94.0%
*-lft-identity94.0%
Simplified94.0%
if 7.9999999999999999e53 < t Initial program 41.1%
+-commutative41.1%
associate-/l*60.0%
fma-define60.0%
Simplified60.0%
clear-num59.9%
inv-pow59.9%
Applied egg-rr59.9%
unpow-159.9%
Simplified59.9%
Taylor expanded in t around inf 71.7%
associate--l+71.7%
associate-*r/71.7%
associate-*r/71.7%
mul-1-neg71.7%
distribute-lft-neg-out71.7%
div-sub71.7%
distribute-lft-neg-out71.7%
mul-1-neg71.7%
distribute-lft-out--71.7%
distribute-rgt-out--71.7%
associate-*r/71.7%
distribute-rgt-out--71.7%
Simplified85.4%
Final simplification91.5%
(FPCore (x y z t a)
:precision binary64
(if (<= t -1.85e+71)
(+ y (* (/ (- y x) t) (- a z)))
(if (<= t 6.8e+53)
(+ x (/ (* (- y x) (- z t)) (- a t)))
(+ y (* (- y x) (/ (- a z) t))))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (t <= -1.85e+71) {
tmp = y + (((y - x) / t) * (a - z));
} else if (t <= 6.8e+53) {
tmp = x + (((y - x) * (z - t)) / (a - t));
} else {
tmp = y + ((y - x) * ((a - z) / 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 (t <= (-1.85d+71)) then
tmp = y + (((y - x) / t) * (a - z))
else if (t <= 6.8d+53) then
tmp = x + (((y - x) * (z - t)) / (a - t))
else
tmp = y + ((y - x) * ((a - z) / t))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
double tmp;
if (t <= -1.85e+71) {
tmp = y + (((y - x) / t) * (a - z));
} else if (t <= 6.8e+53) {
tmp = x + (((y - x) * (z - t)) / (a - t));
} else {
tmp = y + ((y - x) * ((a - z) / t));
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if t <= -1.85e+71: tmp = y + (((y - x) / t) * (a - z)) elif t <= 6.8e+53: tmp = x + (((y - x) * (z - t)) / (a - t)) else: tmp = y + ((y - x) * ((a - z) / t)) return tmp
function code(x, y, z, t, a) tmp = 0.0 if (t <= -1.85e+71) tmp = Float64(y + Float64(Float64(Float64(y - x) / t) * Float64(a - z))); elseif (t <= 6.8e+53) tmp = Float64(x + Float64(Float64(Float64(y - x) * Float64(z - t)) / Float64(a - t))); else tmp = Float64(y + Float64(Float64(y - x) * Float64(Float64(a - z) / t))); end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (t <= -1.85e+71) tmp = y + (((y - x) / t) * (a - z)); elseif (t <= 6.8e+53) tmp = x + (((y - x) * (z - t)) / (a - t)); else tmp = y + ((y - x) * ((a - z) / t)); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[t, -1.85e+71], N[(y + N[(N[(N[(y - x), $MachinePrecision] / t), $MachinePrecision] * N[(a - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t, 6.8e+53], N[(x + N[(N[(N[(y - x), $MachinePrecision] * N[(z - t), $MachinePrecision]), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(y + N[(N[(y - x), $MachinePrecision] * N[(N[(a - z), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;t \leq -1.85 \cdot 10^{+71}:\\
\;\;\;\;y + \frac{y - x}{t} \cdot \left(a - z\right)\\
\mathbf{elif}\;t \leq 6.8 \cdot 10^{+53}:\\
\;\;\;\;x + \frac{\left(y - x\right) \cdot \left(z - t\right)}{a - t}\\
\mathbf{else}:\\
\;\;\;\;y + \left(y - x\right) \cdot \frac{a - z}{t}\\
\end{array}
\end{array}
if t < -1.85e71Initial program 38.3%
Taylor expanded in t around inf 66.3%
associate--l+66.3%
distribute-lft-out--66.3%
div-sub66.3%
mul-1-neg66.3%
unsub-neg66.3%
div-sub66.3%
associate-/l*80.6%
associate-/l*88.3%
distribute-rgt-out--88.3%
Simplified88.3%
if -1.85e71 < t < 6.79999999999999995e53Initial program 83.5%
if 6.79999999999999995e53 < t Initial program 41.1%
+-commutative41.1%
associate-/l*60.0%
fma-define60.0%
Simplified60.0%
clear-num59.9%
inv-pow59.9%
Applied egg-rr59.9%
unpow-159.9%
Simplified59.9%
Taylor expanded in t around inf 71.7%
associate--l+71.7%
associate-*r/71.7%
associate-*r/71.7%
mul-1-neg71.7%
distribute-lft-neg-out71.7%
div-sub71.7%
distribute-lft-neg-out71.7%
mul-1-neg71.7%
distribute-lft-out--71.7%
distribute-rgt-out--71.7%
associate-*r/71.7%
distribute-rgt-out--71.7%
Simplified85.4%
Final simplification84.6%
(FPCore (x y z t a)
:precision binary64
(if (<= a -1.2e+32)
x
(if (<= a -3.4e-72)
(* z (/ (- x y) t))
(if (<= a 2.4e+84) (* y (- 1.0 (/ z t))) x))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -1.2e+32) {
tmp = x;
} else if (a <= -3.4e-72) {
tmp = z * ((x - y) / t);
} else if (a <= 2.4e+84) {
tmp = y * (1.0 - (z / t));
} 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 <= (-1.2d+32)) then
tmp = x
else if (a <= (-3.4d-72)) then
tmp = z * ((x - y) / t)
else if (a <= 2.4d+84) then
tmp = y * (1.0d0 - (z / t))
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 <= -1.2e+32) {
tmp = x;
} else if (a <= -3.4e-72) {
tmp = z * ((x - y) / t);
} else if (a <= 2.4e+84) {
tmp = y * (1.0 - (z / t));
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if a <= -1.2e+32: tmp = x elif a <= -3.4e-72: tmp = z * ((x - y) / t) elif a <= 2.4e+84: tmp = y * (1.0 - (z / t)) else: tmp = x return tmp
function code(x, y, z, t, a) tmp = 0.0 if (a <= -1.2e+32) tmp = x; elseif (a <= -3.4e-72) tmp = Float64(z * Float64(Float64(x - y) / t)); elseif (a <= 2.4e+84) tmp = Float64(y * Float64(1.0 - Float64(z / t))); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (a <= -1.2e+32) tmp = x; elseif (a <= -3.4e-72) tmp = z * ((x - y) / t); elseif (a <= 2.4e+84) tmp = y * (1.0 - (z / t)); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[a, -1.2e+32], x, If[LessEqual[a, -3.4e-72], N[(z * N[(N[(x - y), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 2.4e+84], N[(y * N[(1.0 - N[(z / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], x]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -1.2 \cdot 10^{+32}:\\
\;\;\;\;x\\
\mathbf{elif}\;a \leq -3.4 \cdot 10^{-72}:\\
\;\;\;\;z \cdot \frac{x - y}{t}\\
\mathbf{elif}\;a \leq 2.4 \cdot 10^{+84}:\\
\;\;\;\;y \cdot \left(1 - \frac{z}{t}\right)\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if a < -1.19999999999999996e32 or 2.4e84 < a Initial program 74.0%
Taylor expanded in a around inf 61.7%
if -1.19999999999999996e32 < a < -3.3999999999999998e-72Initial program 71.0%
Taylor expanded in a around 0 42.3%
mul-1-neg42.3%
unsub-neg42.3%
associate-/l*44.2%
div-sub44.2%
sub-neg44.2%
*-inverses44.2%
metadata-eval44.2%
Simplified44.2%
Taylor expanded in z around inf 51.2%
div-sub51.6%
Simplified51.6%
if -3.3999999999999998e-72 < a < 2.4e84Initial program 64.3%
Taylor expanded in a around 0 47.1%
mul-1-neg47.1%
unsub-neg47.1%
associate-/l*57.2%
div-sub57.2%
sub-neg57.2%
*-inverses57.2%
metadata-eval57.2%
Simplified57.2%
Taylor expanded in x around 0 58.3%
mul-1-neg58.3%
sub-neg58.3%
metadata-eval58.3%
*-commutative58.3%
distribute-lft-neg-in58.3%
distribute-neg-in58.3%
mul-1-neg58.3%
metadata-eval58.3%
+-commutative58.3%
mul-1-neg58.3%
sub-neg58.3%
*-commutative58.3%
Simplified58.3%
(FPCore (x y z t a)
:precision binary64
(if (<= a -1.85e-6)
x
(if (<= a -2.02e-50)
(* x (/ (- z a) t))
(if (<= a 2.9e+90) (* y (- 1.0 (/ z t))) x))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -1.85e-6) {
tmp = x;
} else if (a <= -2.02e-50) {
tmp = x * ((z - a) / t);
} else if (a <= 2.9e+90) {
tmp = y * (1.0 - (z / t));
} 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 <= (-1.85d-6)) then
tmp = x
else if (a <= (-2.02d-50)) then
tmp = x * ((z - a) / t)
else if (a <= 2.9d+90) then
tmp = y * (1.0d0 - (z / t))
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 <= -1.85e-6) {
tmp = x;
} else if (a <= -2.02e-50) {
tmp = x * ((z - a) / t);
} else if (a <= 2.9e+90) {
tmp = y * (1.0 - (z / t));
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if a <= -1.85e-6: tmp = x elif a <= -2.02e-50: tmp = x * ((z - a) / t) elif a <= 2.9e+90: tmp = y * (1.0 - (z / t)) else: tmp = x return tmp
function code(x, y, z, t, a) tmp = 0.0 if (a <= -1.85e-6) tmp = x; elseif (a <= -2.02e-50) tmp = Float64(x * Float64(Float64(z - a) / t)); elseif (a <= 2.9e+90) tmp = Float64(y * Float64(1.0 - Float64(z / t))); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (a <= -1.85e-6) tmp = x; elseif (a <= -2.02e-50) tmp = x * ((z - a) / t); elseif (a <= 2.9e+90) tmp = y * (1.0 - (z / t)); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[a, -1.85e-6], x, If[LessEqual[a, -2.02e-50], N[(x * N[(N[(z - a), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 2.9e+90], N[(y * N[(1.0 - N[(z / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], x]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -1.85 \cdot 10^{-6}:\\
\;\;\;\;x\\
\mathbf{elif}\;a \leq -2.02 \cdot 10^{-50}:\\
\;\;\;\;x \cdot \frac{z - a}{t}\\
\mathbf{elif}\;a \leq 2.9 \cdot 10^{+90}:\\
\;\;\;\;y \cdot \left(1 - \frac{z}{t}\right)\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if a < -1.8500000000000001e-6 or 2.9000000000000001e90 < a Initial program 73.0%
Taylor expanded in a around inf 60.9%
if -1.8500000000000001e-6 < a < -2.02000000000000007e-50Initial program 64.9%
+-commutative64.9%
associate-/l*64.4%
fma-define64.4%
Simplified64.4%
clear-num64.4%
inv-pow64.4%
Applied egg-rr64.4%
unpow-164.4%
Simplified64.4%
Taylor expanded in t around inf 56.6%
associate--l+56.6%
associate-*r/56.6%
associate-*r/56.6%
mul-1-neg56.6%
distribute-lft-neg-out56.6%
div-sub56.6%
distribute-lft-neg-out56.6%
mul-1-neg56.6%
distribute-lft-out--56.6%
distribute-rgt-out--56.6%
associate-*r/56.6%
distribute-rgt-out--56.6%
Simplified73.7%
Taylor expanded in y around 0 48.0%
associate-/l*65.1%
Simplified65.1%
if -2.02000000000000007e-50 < a < 2.9000000000000001e90Initial program 65.8%
Taylor expanded in a around 0 47.9%
mul-1-neg47.9%
unsub-neg47.9%
associate-/l*57.5%
div-sub57.5%
sub-neg57.5%
*-inverses57.5%
metadata-eval57.5%
Simplified57.5%
Taylor expanded in x around 0 57.3%
mul-1-neg57.3%
sub-neg57.3%
metadata-eval57.3%
*-commutative57.3%
distribute-lft-neg-in57.3%
distribute-neg-in57.3%
mul-1-neg57.3%
metadata-eval57.3%
+-commutative57.3%
mul-1-neg57.3%
sub-neg57.3%
*-commutative57.3%
Simplified57.3%
(FPCore (x y z t a) :precision binary64 (if (<= a -9.5e-17) x (if (<= a -1.1e-62) (* y (/ z a)) (if (<= a 7.7e+84) y x))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -9.5e-17) {
tmp = x;
} else if (a <= -1.1e-62) {
tmp = y * (z / a);
} else if (a <= 7.7e+84) {
tmp = 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 <= (-9.5d-17)) then
tmp = x
else if (a <= (-1.1d-62)) then
tmp = y * (z / a)
else if (a <= 7.7d+84) then
tmp = 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 <= -9.5e-17) {
tmp = x;
} else if (a <= -1.1e-62) {
tmp = y * (z / a);
} else if (a <= 7.7e+84) {
tmp = y;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if a <= -9.5e-17: tmp = x elif a <= -1.1e-62: tmp = y * (z / a) elif a <= 7.7e+84: tmp = y else: tmp = x return tmp
function code(x, y, z, t, a) tmp = 0.0 if (a <= -9.5e-17) tmp = x; elseif (a <= -1.1e-62) tmp = Float64(y * Float64(z / a)); elseif (a <= 7.7e+84) tmp = y; else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (a <= -9.5e-17) tmp = x; elseif (a <= -1.1e-62) tmp = y * (z / a); elseif (a <= 7.7e+84) tmp = y; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[a, -9.5e-17], x, If[LessEqual[a, -1.1e-62], N[(y * N[(z / a), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 7.7e+84], y, x]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -9.5 \cdot 10^{-17}:\\
\;\;\;\;x\\
\mathbf{elif}\;a \leq -1.1 \cdot 10^{-62}:\\
\;\;\;\;y \cdot \frac{z}{a}\\
\mathbf{elif}\;a \leq 7.7 \cdot 10^{+84}:\\
\;\;\;\;y\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if a < -9.50000000000000029e-17 or 7.7000000000000003e84 < a Initial program 72.8%
Taylor expanded in a around inf 60.2%
if -9.50000000000000029e-17 < a < -1.10000000000000009e-62Initial program 77.3%
Taylor expanded in t around 0 47.8%
Taylor expanded in z around inf 48.2%
div-sub48.2%
associate-*r/48.0%
*-commutative48.0%
associate-*r/48.2%
Simplified48.2%
Taylor expanded in y around inf 48.8%
associate-/l*49.1%
Simplified49.1%
if -1.10000000000000009e-62 < a < 7.7000000000000003e84Initial program 64.5%
Taylor expanded in t around inf 36.9%
(FPCore (x y z t a) :precision binary64 (if (<= a -1.46e+32) x (if (<= a -5.1e-77) (* x (/ z t)) (if (<= a 1.45e+84) y x))))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -1.46e+32) {
tmp = x;
} else if (a <= -5.1e-77) {
tmp = x * (z / t);
} else if (a <= 1.45e+84) {
tmp = 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 <= (-1.46d+32)) then
tmp = x
else if (a <= (-5.1d-77)) then
tmp = x * (z / t)
else if (a <= 1.45d+84) then
tmp = 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 <= -1.46e+32) {
tmp = x;
} else if (a <= -5.1e-77) {
tmp = x * (z / t);
} else if (a <= 1.45e+84) {
tmp = y;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if a <= -1.46e+32: tmp = x elif a <= -5.1e-77: tmp = x * (z / t) elif a <= 1.45e+84: tmp = y else: tmp = x return tmp
function code(x, y, z, t, a) tmp = 0.0 if (a <= -1.46e+32) tmp = x; elseif (a <= -5.1e-77) tmp = Float64(x * Float64(z / t)); elseif (a <= 1.45e+84) tmp = y; else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (a <= -1.46e+32) tmp = x; elseif (a <= -5.1e-77) tmp = x * (z / t); elseif (a <= 1.45e+84) tmp = y; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[a, -1.46e+32], x, If[LessEqual[a, -5.1e-77], N[(x * N[(z / t), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 1.45e+84], y, x]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -1.46 \cdot 10^{+32}:\\
\;\;\;\;x\\
\mathbf{elif}\;a \leq -5.1 \cdot 10^{-77}:\\
\;\;\;\;x \cdot \frac{z}{t}\\
\mathbf{elif}\;a \leq 1.45 \cdot 10^{+84}:\\
\;\;\;\;y\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if a < -1.46000000000000005e32 or 1.44999999999999994e84 < a Initial program 74.0%
Taylor expanded in a around inf 61.7%
if -1.46000000000000005e32 < a < -5.10000000000000032e-77Initial program 73.7%
Taylor expanded in a around 0 47.5%
mul-1-neg47.5%
unsub-neg47.5%
associate-/l*49.3%
div-sub49.3%
sub-neg49.3%
*-inverses49.3%
metadata-eval49.3%
Simplified49.3%
Taylor expanded in x around -inf 33.7%
associate-/l*42.3%
Simplified42.3%
if -5.10000000000000032e-77 < a < 1.44999999999999994e84Initial program 63.7%
Taylor expanded in t around inf 37.0%
(FPCore (x y z t a) :precision binary64 (if (<= a -1.65e-52) x (if (<= a 1.4e+84) y x)))
double code(double x, double y, double z, double t, double a) {
double tmp;
if (a <= -1.65e-52) {
tmp = x;
} else if (a <= 1.4e+84) {
tmp = 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 <= (-1.65d-52)) then
tmp = x
else if (a <= 1.4d+84) then
tmp = 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 <= -1.65e-52) {
tmp = x;
} else if (a <= 1.4e+84) {
tmp = y;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a): tmp = 0 if a <= -1.65e-52: tmp = x elif a <= 1.4e+84: tmp = y else: tmp = x return tmp
function code(x, y, z, t, a) tmp = 0.0 if (a <= -1.65e-52) tmp = x; elseif (a <= 1.4e+84) tmp = y; else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a) tmp = 0.0; if (a <= -1.65e-52) tmp = x; elseif (a <= 1.4e+84) tmp = y; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := If[LessEqual[a, -1.65e-52], x, If[LessEqual[a, 1.4e+84], y, x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -1.65 \cdot 10^{-52}:\\
\;\;\;\;x\\
\mathbf{elif}\;a \leq 1.4 \cdot 10^{+84}:\\
\;\;\;\;y\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if a < -1.64999999999999998e-52 or 1.39999999999999991e84 < a Initial program 72.5%
Taylor expanded in a around inf 55.9%
if -1.64999999999999998e-52 < a < 1.39999999999999991e84Initial program 65.6%
Taylor expanded in t around inf 36.0%
(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 68.8%
Taylor expanded in a around inf 29.8%
(FPCore (x y z t a)
:precision binary64
(let* ((t_1 (+ x (* (/ (- y x) 1.0) (/ (- z t) (- a t))))))
(if (< a -1.6153062845442575e-142)
t_1
(if (< a 3.774403170083174e-182) (- y (* (/ z t) (- y x))) t_1))))
double code(double x, double y, double z, double t, double a) {
double t_1 = x + (((y - x) / 1.0) * ((z - t) / (a - t)));
double tmp;
if (a < -1.6153062845442575e-142) {
tmp = t_1;
} else if (a < 3.774403170083174e-182) {
tmp = y - ((z / t) * (y - x));
} 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 - x) / 1.0d0) * ((z - t) / (a - t)))
if (a < (-1.6153062845442575d-142)) then
tmp = t_1
else if (a < 3.774403170083174d-182) then
tmp = y - ((z / t) * (y - x))
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 - x) / 1.0) * ((z - t) / (a - t)));
double tmp;
if (a < -1.6153062845442575e-142) {
tmp = t_1;
} else if (a < 3.774403170083174e-182) {
tmp = y - ((z / t) * (y - x));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a): t_1 = x + (((y - x) / 1.0) * ((z - t) / (a - t))) tmp = 0 if a < -1.6153062845442575e-142: tmp = t_1 elif a < 3.774403170083174e-182: tmp = y - ((z / t) * (y - x)) else: tmp = t_1 return tmp
function code(x, y, z, t, a) t_1 = Float64(x + Float64(Float64(Float64(y - x) / 1.0) * Float64(Float64(z - t) / Float64(a - t)))) tmp = 0.0 if (a < -1.6153062845442575e-142) tmp = t_1; elseif (a < 3.774403170083174e-182) tmp = Float64(y - Float64(Float64(z / t) * Float64(y - x))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a) t_1 = x + (((y - x) / 1.0) * ((z - t) / (a - t))); tmp = 0.0; if (a < -1.6153062845442575e-142) tmp = t_1; elseif (a < 3.774403170083174e-182) tmp = y - ((z / t) * (y - x)); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(x + N[(N[(N[(y - x), $MachinePrecision] / 1.0), $MachinePrecision] * N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[Less[a, -1.6153062845442575e-142], t$95$1, If[Less[a, 3.774403170083174e-182], N[(y - N[(N[(z / t), $MachinePrecision] * N[(y - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + \frac{y - x}{1} \cdot \frac{z - t}{a - t}\\
\mathbf{if}\;a < -1.6153062845442575 \cdot 10^{-142}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;a < 3.774403170083174 \cdot 10^{-182}:\\
\;\;\;\;y - \frac{z}{t} \cdot \left(y - x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
herbie shell --seed 2024091
(FPCore (x y z t a)
:name "Graphics.Rendering.Chart.Axis.Types:linMap from Chart-1.5.3"
:precision binary64
:alt
(if (< a -1.6153062845442575e-142) (+ x (* (/ (- y x) 1.0) (/ (- z t) (- a t)))) (if (< a 3.774403170083174e-182) (- y (* (/ z t) (- y x))) (+ x (* (/ (- y x) 1.0) (/ (- z t) (- a t))))))
(+ x (/ (* (- y x) (- z t)) (- a t))))