
(FPCore (x y z t a b) :precision binary64 (+ (- (- x (* (- y 1.0) z)) (* (- t 1.0) a)) (* (- (+ y t) 2.0) b)))
double code(double x, double y, double z, double t, double a, double b) {
return ((x - ((y - 1.0) * z)) - ((t - 1.0) * a)) + (((y + t) - 2.0) * b);
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
code = ((x - ((y - 1.0d0) * z)) - ((t - 1.0d0) * a)) + (((y + t) - 2.0d0) * b)
end function
public static double code(double x, double y, double z, double t, double a, double b) {
return ((x - ((y - 1.0) * z)) - ((t - 1.0) * a)) + (((y + t) - 2.0) * b);
}
def code(x, y, z, t, a, b): return ((x - ((y - 1.0) * z)) - ((t - 1.0) * a)) + (((y + t) - 2.0) * b)
function code(x, y, z, t, a, b) return Float64(Float64(Float64(x - Float64(Float64(y - 1.0) * z)) - Float64(Float64(t - 1.0) * a)) + Float64(Float64(Float64(y + t) - 2.0) * b)) end
function tmp = code(x, y, z, t, a, b) tmp = ((x - ((y - 1.0) * z)) - ((t - 1.0) * a)) + (((y + t) - 2.0) * b); end
code[x_, y_, z_, t_, a_, b_] := N[(N[(N[(x - N[(N[(y - 1.0), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision] - N[(N[(t - 1.0), $MachinePrecision] * a), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(y + t), $MachinePrecision] - 2.0), $MachinePrecision] * b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(\left(x - \left(y - 1\right) \cdot z\right) - \left(t - 1\right) \cdot a\right) + \left(\left(y + t\right) - 2\right) \cdot b
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 19 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z t a b) :precision binary64 (+ (- (- x (* (- y 1.0) z)) (* (- t 1.0) a)) (* (- (+ y t) 2.0) b)))
double code(double x, double y, double z, double t, double a, double b) {
return ((x - ((y - 1.0) * z)) - ((t - 1.0) * a)) + (((y + t) - 2.0) * b);
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
code = ((x - ((y - 1.0d0) * z)) - ((t - 1.0d0) * a)) + (((y + t) - 2.0d0) * b)
end function
public static double code(double x, double y, double z, double t, double a, double b) {
return ((x - ((y - 1.0) * z)) - ((t - 1.0) * a)) + (((y + t) - 2.0) * b);
}
def code(x, y, z, t, a, b): return ((x - ((y - 1.0) * z)) - ((t - 1.0) * a)) + (((y + t) - 2.0) * b)
function code(x, y, z, t, a, b) return Float64(Float64(Float64(x - Float64(Float64(y - 1.0) * z)) - Float64(Float64(t - 1.0) * a)) + Float64(Float64(Float64(y + t) - 2.0) * b)) end
function tmp = code(x, y, z, t, a, b) tmp = ((x - ((y - 1.0) * z)) - ((t - 1.0) * a)) + (((y + t) - 2.0) * b); end
code[x_, y_, z_, t_, a_, b_] := N[(N[(N[(x - N[(N[(y - 1.0), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision] - N[(N[(t - 1.0), $MachinePrecision] * a), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(y + t), $MachinePrecision] - 2.0), $MachinePrecision] * b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(\left(x - \left(y - 1\right) \cdot z\right) - \left(t - 1\right) \cdot a\right) + \left(\left(y + t\right) - 2\right) \cdot b
\end{array}
(FPCore (x y z t a b)
:precision binary64
(let* ((t_1
(+ (+ (+ x (* z (- 1.0 y))) (* a (- 1.0 t))) (* (- (+ y t) 2.0) b))))
(if (<= t_1 INFINITY) t_1 (* t (- b a)))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = ((x + (z * (1.0 - y))) + (a * (1.0 - t))) + (((y + t) - 2.0) * b);
double tmp;
if (t_1 <= ((double) INFINITY)) {
tmp = t_1;
} else {
tmp = t * (b - a);
}
return tmp;
}
public static double code(double x, double y, double z, double t, double a, double b) {
double t_1 = ((x + (z * (1.0 - y))) + (a * (1.0 - t))) + (((y + t) - 2.0) * b);
double tmp;
if (t_1 <= Double.POSITIVE_INFINITY) {
tmp = t_1;
} else {
tmp = t * (b - a);
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = ((x + (z * (1.0 - y))) + (a * (1.0 - t))) + (((y + t) - 2.0) * b) tmp = 0 if t_1 <= math.inf: tmp = t_1 else: tmp = t * (b - a) return tmp
function code(x, y, z, t, a, b) t_1 = Float64(Float64(Float64(x + Float64(z * Float64(1.0 - y))) + Float64(a * Float64(1.0 - t))) + Float64(Float64(Float64(y + t) - 2.0) * b)) tmp = 0.0 if (t_1 <= Inf) tmp = t_1; else tmp = Float64(t * Float64(b - a)); end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = ((x + (z * (1.0 - y))) + (a * (1.0 - t))) + (((y + t) - 2.0) * b); tmp = 0.0; if (t_1 <= Inf) tmp = t_1; else tmp = t * (b - a); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(N[(N[(x + N[(z * N[(1.0 - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(a * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(y + t), $MachinePrecision] - 2.0), $MachinePrecision] * b), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, Infinity], t$95$1, N[(t * N[(b - a), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := \left(\left(x + z \cdot \left(1 - y\right)\right) + a \cdot \left(1 - t\right)\right) + \left(\left(y + t\right) - 2\right) \cdot b\\
\mathbf{if}\;t\_1 \leq \infty:\\
\;\;\;\;t\_1\\
\mathbf{else}:\\
\;\;\;\;t \cdot \left(b - a\right)\\
\end{array}
\end{array}
if (+.f64 (-.f64 (-.f64 x (*.f64 (-.f64 y #s(literal 1 binary64)) z)) (*.f64 (-.f64 t #s(literal 1 binary64)) a)) (*.f64 (-.f64 (+.f64 y t) #s(literal 2 binary64)) b)) < +inf.0Initial program 100.0%
if +inf.0 < (+.f64 (-.f64 (-.f64 x (*.f64 (-.f64 y #s(literal 1 binary64)) z)) (*.f64 (-.f64 t #s(literal 1 binary64)) a)) (*.f64 (-.f64 (+.f64 y t) #s(literal 2 binary64)) b)) Initial program 0.0%
Taylor expanded in t around inf
*-lowering-*.f64N/A
--lowering--.f6483.9%
Simplified83.9%
Final simplification99.2%
(FPCore (x y z t a b)
:precision binary64
(let* ((t_1 (* a (- 1.0 t))) (t_2 (* (- (+ y t) 2.0) b)))
(if (<= b -3.1e+99)
(+ x t_2)
(if (<= b 20.0) (+ x (+ (* z (- 1.0 y)) t_1)) (+ t_2 (+ x t_1))))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = a * (1.0 - t);
double t_2 = ((y + t) - 2.0) * b;
double tmp;
if (b <= -3.1e+99) {
tmp = x + t_2;
} else if (b <= 20.0) {
tmp = x + ((z * (1.0 - y)) + t_1);
} else {
tmp = t_2 + (x + t_1);
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: t_2
real(8) :: tmp
t_1 = a * (1.0d0 - t)
t_2 = ((y + t) - 2.0d0) * b
if (b <= (-3.1d+99)) then
tmp = x + t_2
else if (b <= 20.0d0) then
tmp = x + ((z * (1.0d0 - y)) + t_1)
else
tmp = t_2 + (x + t_1)
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b) {
double t_1 = a * (1.0 - t);
double t_2 = ((y + t) - 2.0) * b;
double tmp;
if (b <= -3.1e+99) {
tmp = x + t_2;
} else if (b <= 20.0) {
tmp = x + ((z * (1.0 - y)) + t_1);
} else {
tmp = t_2 + (x + t_1);
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = a * (1.0 - t) t_2 = ((y + t) - 2.0) * b tmp = 0 if b <= -3.1e+99: tmp = x + t_2 elif b <= 20.0: tmp = x + ((z * (1.0 - y)) + t_1) else: tmp = t_2 + (x + t_1) return tmp
function code(x, y, z, t, a, b) t_1 = Float64(a * Float64(1.0 - t)) t_2 = Float64(Float64(Float64(y + t) - 2.0) * b) tmp = 0.0 if (b <= -3.1e+99) tmp = Float64(x + t_2); elseif (b <= 20.0) tmp = Float64(x + Float64(Float64(z * Float64(1.0 - y)) + t_1)); else tmp = Float64(t_2 + Float64(x + t_1)); end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = a * (1.0 - t); t_2 = ((y + t) - 2.0) * b; tmp = 0.0; if (b <= -3.1e+99) tmp = x + t_2; elseif (b <= 20.0) tmp = x + ((z * (1.0 - y)) + t_1); else tmp = t_2 + (x + t_1); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(a * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(N[(y + t), $MachinePrecision] - 2.0), $MachinePrecision] * b), $MachinePrecision]}, If[LessEqual[b, -3.1e+99], N[(x + t$95$2), $MachinePrecision], If[LessEqual[b, 20.0], N[(x + N[(N[(z * N[(1.0 - y), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision]), $MachinePrecision], N[(t$95$2 + N[(x + t$95$1), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := a \cdot \left(1 - t\right)\\
t_2 := \left(\left(y + t\right) - 2\right) \cdot b\\
\mathbf{if}\;b \leq -3.1 \cdot 10^{+99}:\\
\;\;\;\;x + t\_2\\
\mathbf{elif}\;b \leq 20:\\
\;\;\;\;x + \left(z \cdot \left(1 - y\right) + t\_1\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2 + \left(x + t\_1\right)\\
\end{array}
\end{array}
if b < -3.1000000000000001e99Initial program 85.4%
Taylor expanded in x around inf
Simplified85.5%
if -3.1000000000000001e99 < b < 20Initial program 98.6%
Taylor expanded in b around 0
sub-negN/A
+-lowering-+.f64N/A
+-commutativeN/A
distribute-neg-inN/A
+-lowering-+.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
Simplified90.5%
if 20 < b Initial program 94.4%
Taylor expanded in x around inf
Simplified93.2%
Final simplification90.5%
(FPCore (x y z t a b)
:precision binary64
(let* ((t_1 (* a (- 1.0 t))) (t_2 (* (- (+ y t) 2.0) b)))
(if (<= b -3e+98)
(+ x t_2)
(if (<= b 0.0056) (+ x (+ (* z (- 1.0 y)) t_1)) (+ t_2 t_1)))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = a * (1.0 - t);
double t_2 = ((y + t) - 2.0) * b;
double tmp;
if (b <= -3e+98) {
tmp = x + t_2;
} else if (b <= 0.0056) {
tmp = x + ((z * (1.0 - y)) + t_1);
} else {
tmp = t_2 + t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: t_2
real(8) :: tmp
t_1 = a * (1.0d0 - t)
t_2 = ((y + t) - 2.0d0) * b
if (b <= (-3d+98)) then
tmp = x + t_2
else if (b <= 0.0056d0) then
tmp = x + ((z * (1.0d0 - y)) + t_1)
else
tmp = t_2 + t_1
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b) {
double t_1 = a * (1.0 - t);
double t_2 = ((y + t) - 2.0) * b;
double tmp;
if (b <= -3e+98) {
tmp = x + t_2;
} else if (b <= 0.0056) {
tmp = x + ((z * (1.0 - y)) + t_1);
} else {
tmp = t_2 + t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = a * (1.0 - t) t_2 = ((y + t) - 2.0) * b tmp = 0 if b <= -3e+98: tmp = x + t_2 elif b <= 0.0056: tmp = x + ((z * (1.0 - y)) + t_1) else: tmp = t_2 + t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(a * Float64(1.0 - t)) t_2 = Float64(Float64(Float64(y + t) - 2.0) * b) tmp = 0.0 if (b <= -3e+98) tmp = Float64(x + t_2); elseif (b <= 0.0056) tmp = Float64(x + Float64(Float64(z * Float64(1.0 - y)) + t_1)); else tmp = Float64(t_2 + t_1); end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = a * (1.0 - t); t_2 = ((y + t) - 2.0) * b; tmp = 0.0; if (b <= -3e+98) tmp = x + t_2; elseif (b <= 0.0056) tmp = x + ((z * (1.0 - y)) + t_1); else tmp = t_2 + t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(a * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(N[(y + t), $MachinePrecision] - 2.0), $MachinePrecision] * b), $MachinePrecision]}, If[LessEqual[b, -3e+98], N[(x + t$95$2), $MachinePrecision], If[LessEqual[b, 0.0056], N[(x + N[(N[(z * N[(1.0 - y), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision]), $MachinePrecision], N[(t$95$2 + t$95$1), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := a \cdot \left(1 - t\right)\\
t_2 := \left(\left(y + t\right) - 2\right) \cdot b\\
\mathbf{if}\;b \leq -3 \cdot 10^{+98}:\\
\;\;\;\;x + t\_2\\
\mathbf{elif}\;b \leq 0.0056:\\
\;\;\;\;x + \left(z \cdot \left(1 - y\right) + t\_1\right)\\
\mathbf{else}:\\
\;\;\;\;t\_2 + t\_1\\
\end{array}
\end{array}
if b < -3.0000000000000001e98Initial program 85.4%
Taylor expanded in x around inf
Simplified85.5%
if -3.0000000000000001e98 < b < 0.00559999999999999994Initial program 98.6%
Taylor expanded in b around 0
sub-negN/A
+-lowering-+.f64N/A
+-commutativeN/A
distribute-neg-inN/A
+-lowering-+.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
Simplified90.5%
if 0.00559999999999999994 < b Initial program 94.4%
Taylor expanded in a around inf
sub-negN/A
metadata-evalN/A
neg-mul-1N/A
distribute-lft-inN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6488.9%
Simplified88.9%
Final simplification89.3%
(FPCore (x y z t a b)
:precision binary64
(let* ((t_1 (+ x (* (- (+ y t) 2.0) b))))
(if (<= b -2.7e+99)
t_1
(if (<= b 1300.0) (+ x (+ (* z (- 1.0 y)) (* a (- 1.0 t)))) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = x + (((y + t) - 2.0) * b);
double tmp;
if (b <= -2.7e+99) {
tmp = t_1;
} else if (b <= 1300.0) {
tmp = x + ((z * (1.0 - y)) + (a * (1.0 - t)));
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = x + (((y + t) - 2.0d0) * b)
if (b <= (-2.7d+99)) then
tmp = t_1
else if (b <= 1300.0d0) then
tmp = x + ((z * (1.0d0 - y)) + (a * (1.0d0 - 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 b) {
double t_1 = x + (((y + t) - 2.0) * b);
double tmp;
if (b <= -2.7e+99) {
tmp = t_1;
} else if (b <= 1300.0) {
tmp = x + ((z * (1.0 - y)) + (a * (1.0 - t)));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = x + (((y + t) - 2.0) * b) tmp = 0 if b <= -2.7e+99: tmp = t_1 elif b <= 1300.0: tmp = x + ((z * (1.0 - y)) + (a * (1.0 - t))) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(x + Float64(Float64(Float64(y + t) - 2.0) * b)) tmp = 0.0 if (b <= -2.7e+99) tmp = t_1; elseif (b <= 1300.0) tmp = Float64(x + Float64(Float64(z * Float64(1.0 - y)) + Float64(a * Float64(1.0 - t)))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = x + (((y + t) - 2.0) * b); tmp = 0.0; if (b <= -2.7e+99) tmp = t_1; elseif (b <= 1300.0) tmp = x + ((z * (1.0 - y)) + (a * (1.0 - t))); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(x + N[(N[(N[(y + t), $MachinePrecision] - 2.0), $MachinePrecision] * b), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -2.7e+99], t$95$1, If[LessEqual[b, 1300.0], N[(x + N[(N[(z * N[(1.0 - y), $MachinePrecision]), $MachinePrecision] + N[(a * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + \left(\left(y + t\right) - 2\right) \cdot b\\
\mathbf{if}\;b \leq -2.7 \cdot 10^{+99}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;b \leq 1300:\\
\;\;\;\;x + \left(z \cdot \left(1 - y\right) + a \cdot \left(1 - t\right)\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if b < -2.69999999999999989e99 or 1300 < b Initial program 91.0%
Taylor expanded in x around inf
Simplified85.0%
if -2.69999999999999989e99 < b < 1300Initial program 98.6%
Taylor expanded in b around 0
sub-negN/A
+-lowering-+.f64N/A
+-commutativeN/A
distribute-neg-inN/A
+-lowering-+.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
Simplified90.6%
(FPCore (x y z t a b)
:precision binary64
(let* ((t_1 (+ x (* (- (+ y t) 2.0) b))))
(if (<= b -1.15e+88)
t_1
(if (<= b 160.0) (+ x (+ a (* z (- 1.0 y)))) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = x + (((y + t) - 2.0) * b);
double tmp;
if (b <= -1.15e+88) {
tmp = t_1;
} else if (b <= 160.0) {
tmp = x + (a + (z * (1.0 - y)));
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = x + (((y + t) - 2.0d0) * b)
if (b <= (-1.15d+88)) then
tmp = t_1
else if (b <= 160.0d0) then
tmp = x + (a + (z * (1.0d0 - 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 b) {
double t_1 = x + (((y + t) - 2.0) * b);
double tmp;
if (b <= -1.15e+88) {
tmp = t_1;
} else if (b <= 160.0) {
tmp = x + (a + (z * (1.0 - y)));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = x + (((y + t) - 2.0) * b) tmp = 0 if b <= -1.15e+88: tmp = t_1 elif b <= 160.0: tmp = x + (a + (z * (1.0 - y))) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(x + Float64(Float64(Float64(y + t) - 2.0) * b)) tmp = 0.0 if (b <= -1.15e+88) tmp = t_1; elseif (b <= 160.0) tmp = Float64(x + Float64(a + Float64(z * Float64(1.0 - y)))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = x + (((y + t) - 2.0) * b); tmp = 0.0; if (b <= -1.15e+88) tmp = t_1; elseif (b <= 160.0) tmp = x + (a + (z * (1.0 - y))); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(x + N[(N[(N[(y + t), $MachinePrecision] - 2.0), $MachinePrecision] * b), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -1.15e+88], t$95$1, If[LessEqual[b, 160.0], N[(x + N[(a + N[(z * N[(1.0 - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + \left(\left(y + t\right) - 2\right) \cdot b\\
\mathbf{if}\;b \leq -1.15 \cdot 10^{+88}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;b \leq 160:\\
\;\;\;\;x + \left(a + z \cdot \left(1 - y\right)\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if b < -1.1500000000000001e88 or 160 < b Initial program 91.0%
Taylor expanded in x around inf
Simplified85.0%
if -1.1500000000000001e88 < b < 160Initial program 98.6%
Taylor expanded in b around 0
sub-negN/A
+-lowering-+.f64N/A
+-commutativeN/A
distribute-neg-inN/A
+-lowering-+.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
Simplified90.6%
Taylor expanded in t around 0
Simplified73.1%
Final simplification78.3%
(FPCore (x y z t a b) :precision binary64 (let* ((t_1 (+ x (* (- (+ y t) 2.0) b)))) (if (<= b -1.08e+88) t_1 (if (<= b 1e-6) (+ x (* z (- 1.0 y))) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = x + (((y + t) - 2.0) * b);
double tmp;
if (b <= -1.08e+88) {
tmp = t_1;
} else if (b <= 1e-6) {
tmp = x + (z * (1.0 - y));
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = x + (((y + t) - 2.0d0) * b)
if (b <= (-1.08d+88)) then
tmp = t_1
else if (b <= 1d-6) then
tmp = x + (z * (1.0d0 - 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 b) {
double t_1 = x + (((y + t) - 2.0) * b);
double tmp;
if (b <= -1.08e+88) {
tmp = t_1;
} else if (b <= 1e-6) {
tmp = x + (z * (1.0 - y));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = x + (((y + t) - 2.0) * b) tmp = 0 if b <= -1.08e+88: tmp = t_1 elif b <= 1e-6: tmp = x + (z * (1.0 - y)) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(x + Float64(Float64(Float64(y + t) - 2.0) * b)) tmp = 0.0 if (b <= -1.08e+88) tmp = t_1; elseif (b <= 1e-6) tmp = Float64(x + Float64(z * Float64(1.0 - y))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = x + (((y + t) - 2.0) * b); tmp = 0.0; if (b <= -1.08e+88) tmp = t_1; elseif (b <= 1e-6) tmp = x + (z * (1.0 - y)); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(x + N[(N[(N[(y + t), $MachinePrecision] - 2.0), $MachinePrecision] * b), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -1.08e+88], t$95$1, If[LessEqual[b, 1e-6], N[(x + N[(z * N[(1.0 - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := x + \left(\left(y + t\right) - 2\right) \cdot b\\
\mathbf{if}\;b \leq -1.08 \cdot 10^{+88}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;b \leq 10^{-6}:\\
\;\;\;\;x + z \cdot \left(1 - y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if b < -1.08000000000000003e88 or 9.99999999999999955e-7 < b Initial program 91.1%
Taylor expanded in x around inf
Simplified84.3%
if -1.08000000000000003e88 < b < 9.99999999999999955e-7Initial program 98.6%
Taylor expanded in b around 0
sub-negN/A
+-lowering-+.f64N/A
+-commutativeN/A
distribute-neg-inN/A
+-lowering-+.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
Simplified90.5%
Taylor expanded in a around 0
+-lowering-+.f64N/A
*-lowering-*.f64N/A
--lowering--.f6462.7%
Simplified62.7%
(FPCore (x y z t a b) :precision binary64 (if (<= y -2.55e+42) (* y b) (if (<= y -3.1e-21) x (if (<= y 6.2e-16) z (* y b)))))
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (y <= -2.55e+42) {
tmp = y * b;
} else if (y <= -3.1e-21) {
tmp = x;
} else if (y <= 6.2e-16) {
tmp = z;
} else {
tmp = y * b;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: tmp
if (y <= (-2.55d+42)) then
tmp = y * b
else if (y <= (-3.1d-21)) then
tmp = x
else if (y <= 6.2d-16) then
tmp = z
else
tmp = y * b
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (y <= -2.55e+42) {
tmp = y * b;
} else if (y <= -3.1e-21) {
tmp = x;
} else if (y <= 6.2e-16) {
tmp = z;
} else {
tmp = y * b;
}
return tmp;
}
def code(x, y, z, t, a, b): tmp = 0 if y <= -2.55e+42: tmp = y * b elif y <= -3.1e-21: tmp = x elif y <= 6.2e-16: tmp = z else: tmp = y * b return tmp
function code(x, y, z, t, a, b) tmp = 0.0 if (y <= -2.55e+42) tmp = Float64(y * b); elseif (y <= -3.1e-21) tmp = x; elseif (y <= 6.2e-16) tmp = z; else tmp = Float64(y * b); end return tmp end
function tmp_2 = code(x, y, z, t, a, b) tmp = 0.0; if (y <= -2.55e+42) tmp = y * b; elseif (y <= -3.1e-21) tmp = x; elseif (y <= 6.2e-16) tmp = z; else tmp = y * b; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := If[LessEqual[y, -2.55e+42], N[(y * b), $MachinePrecision], If[LessEqual[y, -3.1e-21], x, If[LessEqual[y, 6.2e-16], z, N[(y * b), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq -2.55 \cdot 10^{+42}:\\
\;\;\;\;y \cdot b\\
\mathbf{elif}\;y \leq -3.1 \cdot 10^{-21}:\\
\;\;\;\;x\\
\mathbf{elif}\;y \leq 6.2 \cdot 10^{-16}:\\
\;\;\;\;z\\
\mathbf{else}:\\
\;\;\;\;y \cdot b\\
\end{array}
\end{array}
if y < -2.55e42 or 6.2000000000000002e-16 < y Initial program 91.8%
Taylor expanded in x around inf
Simplified57.1%
Taylor expanded in y around inf
*-lowering-*.f6437.7%
Simplified37.7%
if -2.55e42 < y < -3.0999999999999998e-21Initial program 100.0%
Taylor expanded in x around inf
Simplified45.4%
if -3.0999999999999998e-21 < y < 6.2000000000000002e-16Initial program 98.3%
Taylor expanded in z around inf
sub-negN/A
neg-mul-1N/A
+-commutativeN/A
neg-mul-1N/A
metadata-evalN/A
distribute-neg-inN/A
metadata-evalN/A
sub-negN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6424.9%
Simplified24.9%
Taylor expanded in y around 0
Simplified24.9%
Final simplification32.4%
(FPCore (x y z t a b) :precision binary64 (let* ((t_1 (* b (+ t (+ y -2.0))))) (if (<= b -7.2e+90) t_1 (if (<= b 1300.0) (+ x (* z (- 1.0 y))) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = b * (t + (y + -2.0));
double tmp;
if (b <= -7.2e+90) {
tmp = t_1;
} else if (b <= 1300.0) {
tmp = x + (z * (1.0 - y));
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = b * (t + (y + (-2.0d0)))
if (b <= (-7.2d+90)) then
tmp = t_1
else if (b <= 1300.0d0) then
tmp = x + (z * (1.0d0 - 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 b) {
double t_1 = b * (t + (y + -2.0));
double tmp;
if (b <= -7.2e+90) {
tmp = t_1;
} else if (b <= 1300.0) {
tmp = x + (z * (1.0 - y));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = b * (t + (y + -2.0)) tmp = 0 if b <= -7.2e+90: tmp = t_1 elif b <= 1300.0: tmp = x + (z * (1.0 - y)) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(b * Float64(t + Float64(y + -2.0))) tmp = 0.0 if (b <= -7.2e+90) tmp = t_1; elseif (b <= 1300.0) tmp = Float64(x + Float64(z * Float64(1.0 - y))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = b * (t + (y + -2.0)); tmp = 0.0; if (b <= -7.2e+90) tmp = t_1; elseif (b <= 1300.0) tmp = x + (z * (1.0 - y)); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(b * N[(t + N[(y + -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -7.2e+90], t$95$1, If[LessEqual[b, 1300.0], N[(x + N[(z * N[(1.0 - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := b \cdot \left(t + \left(y + -2\right)\right)\\
\mathbf{if}\;b \leq -7.2 \cdot 10^{+90}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;b \leq 1300:\\
\;\;\;\;x + z \cdot \left(1 - y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if b < -7.2e90 or 1300 < b Initial program 91.0%
Taylor expanded in b around inf
*-lowering-*.f64N/A
associate--l+N/A
+-lowering-+.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval80.7%
Simplified80.7%
if -7.2e90 < b < 1300Initial program 98.6%
Taylor expanded in b around 0
sub-negN/A
+-lowering-+.f64N/A
+-commutativeN/A
distribute-neg-inN/A
+-lowering-+.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f64N/A
distribute-rgt-neg-inN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
Simplified90.6%
Taylor expanded in a around 0
+-lowering-+.f64N/A
*-lowering-*.f64N/A
--lowering--.f6462.3%
Simplified62.3%
(FPCore (x y z t a b) :precision binary64 (let* ((t_1 (* b (+ t (+ y -2.0))))) (if (<= b -2.8e+58) t_1 (if (<= b 3e+14) (+ x (* a (- 1.0 t))) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = b * (t + (y + -2.0));
double tmp;
if (b <= -2.8e+58) {
tmp = t_1;
} else if (b <= 3e+14) {
tmp = x + (a * (1.0 - t));
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = b * (t + (y + (-2.0d0)))
if (b <= (-2.8d+58)) then
tmp = t_1
else if (b <= 3d+14) then
tmp = x + (a * (1.0d0 - 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 b) {
double t_1 = b * (t + (y + -2.0));
double tmp;
if (b <= -2.8e+58) {
tmp = t_1;
} else if (b <= 3e+14) {
tmp = x + (a * (1.0 - t));
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = b * (t + (y + -2.0)) tmp = 0 if b <= -2.8e+58: tmp = t_1 elif b <= 3e+14: tmp = x + (a * (1.0 - t)) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(b * Float64(t + Float64(y + -2.0))) tmp = 0.0 if (b <= -2.8e+58) tmp = t_1; elseif (b <= 3e+14) tmp = Float64(x + Float64(a * Float64(1.0 - t))); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = b * (t + (y + -2.0)); tmp = 0.0; if (b <= -2.8e+58) tmp = t_1; elseif (b <= 3e+14) tmp = x + (a * (1.0 - t)); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(b * N[(t + N[(y + -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -2.8e+58], t$95$1, If[LessEqual[b, 3e+14], N[(x + N[(a * N[(1.0 - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := b \cdot \left(t + \left(y + -2\right)\right)\\
\mathbf{if}\;b \leq -2.8 \cdot 10^{+58}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;b \leq 3 \cdot 10^{+14}:\\
\;\;\;\;x + a \cdot \left(1 - t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if b < -2.7999999999999998e58 or 3e14 < b Initial program 91.2%
Taylor expanded in b around inf
*-lowering-*.f64N/A
associate--l+N/A
+-lowering-+.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval79.5%
Simplified79.5%
if -2.7999999999999998e58 < b < 3e14Initial program 98.6%
Taylor expanded in x around inf
Simplified60.0%
Taylor expanded in b around 0
sub-negN/A
distribute-rgt-neg-inN/A
remove-double-negN/A
mul-1-negN/A
sub-negN/A
metadata-evalN/A
distribute-neg-inN/A
metadata-evalN/A
+-commutativeN/A
sub-negN/A
cancel-sign-sub-invN/A
mul-1-negN/A
cancel-sign-subN/A
+-lowering-+.f64N/A
*-lowering-*.f64N/A
--lowering--.f6452.2%
Simplified52.2%
(FPCore (x y z t a b) :precision binary64 (let* ((t_1 (* b (+ t (+ y -2.0))))) (if (<= b -6.8e+89) t_1 (if (<= b 2.7e-5) (* z (- 1.0 y)) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = b * (t + (y + -2.0));
double tmp;
if (b <= -6.8e+89) {
tmp = t_1;
} else if (b <= 2.7e-5) {
tmp = z * (1.0 - y);
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = b * (t + (y + (-2.0d0)))
if (b <= (-6.8d+89)) then
tmp = t_1
else if (b <= 2.7d-5) then
tmp = z * (1.0d0 - 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 b) {
double t_1 = b * (t + (y + -2.0));
double tmp;
if (b <= -6.8e+89) {
tmp = t_1;
} else if (b <= 2.7e-5) {
tmp = z * (1.0 - y);
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = b * (t + (y + -2.0)) tmp = 0 if b <= -6.8e+89: tmp = t_1 elif b <= 2.7e-5: tmp = z * (1.0 - y) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(b * Float64(t + Float64(y + -2.0))) tmp = 0.0 if (b <= -6.8e+89) tmp = t_1; elseif (b <= 2.7e-5) tmp = Float64(z * Float64(1.0 - y)); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = b * (t + (y + -2.0)); tmp = 0.0; if (b <= -6.8e+89) tmp = t_1; elseif (b <= 2.7e-5) tmp = z * (1.0 - y); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(b * N[(t + N[(y + -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -6.8e+89], t$95$1, If[LessEqual[b, 2.7e-5], N[(z * N[(1.0 - y), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := b \cdot \left(t + \left(y + -2\right)\right)\\
\mathbf{if}\;b \leq -6.8 \cdot 10^{+89}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;b \leq 2.7 \cdot 10^{-5}:\\
\;\;\;\;z \cdot \left(1 - y\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if b < -6.8000000000000004e89 or 2.6999999999999999e-5 < b Initial program 91.1%
Taylor expanded in b around inf
*-lowering-*.f64N/A
associate--l+N/A
+-lowering-+.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval80.0%
Simplified80.0%
if -6.8000000000000004e89 < b < 2.6999999999999999e-5Initial program 98.6%
Taylor expanded in z around inf
sub-negN/A
neg-mul-1N/A
+-commutativeN/A
neg-mul-1N/A
metadata-evalN/A
distribute-neg-inN/A
metadata-evalN/A
sub-negN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6442.6%
Simplified42.6%
(FPCore (x y z t a b) :precision binary64 (let* ((t_1 (* t (- b a)))) (if (<= t -1050000000.0) t_1 (if (<= t 1.5e+75) (* y (- b z)) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = t * (b - a);
double tmp;
if (t <= -1050000000.0) {
tmp = t_1;
} else if (t <= 1.5e+75) {
tmp = y * (b - z);
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = t * (b - a)
if (t <= (-1050000000.0d0)) then
tmp = t_1
else if (t <= 1.5d+75) then
tmp = y * (b - z)
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 b) {
double t_1 = t * (b - a);
double tmp;
if (t <= -1050000000.0) {
tmp = t_1;
} else if (t <= 1.5e+75) {
tmp = y * (b - z);
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = t * (b - a) tmp = 0 if t <= -1050000000.0: tmp = t_1 elif t <= 1.5e+75: tmp = y * (b - z) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(t * Float64(b - a)) tmp = 0.0 if (t <= -1050000000.0) tmp = t_1; elseif (t <= 1.5e+75) tmp = Float64(y * Float64(b - z)); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = t * (b - a); tmp = 0.0; if (t <= -1050000000.0) tmp = t_1; elseif (t <= 1.5e+75) tmp = y * (b - z); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(t * N[(b - a), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t, -1050000000.0], t$95$1, If[LessEqual[t, 1.5e+75], N[(y * N[(b - z), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := t \cdot \left(b - a\right)\\
\mathbf{if}\;t \leq -1050000000:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t \leq 1.5 \cdot 10^{+75}:\\
\;\;\;\;y \cdot \left(b - z\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if t < -1.05e9 or 1.5e75 < t Initial program 90.7%
Taylor expanded in t around inf
*-lowering-*.f64N/A
--lowering--.f6473.9%
Simplified73.9%
if -1.05e9 < t < 1.5e75Initial program 98.6%
Taylor expanded in y around inf
*-lowering-*.f64N/A
--lowering--.f6444.7%
Simplified44.7%
(FPCore (x y z t a b) :precision binary64 (let* ((t_1 (* t (- b a)))) (if (<= t -2800.0) t_1 (if (<= t 7.5e+77) (* b (+ y -2.0)) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = t * (b - a);
double tmp;
if (t <= -2800.0) {
tmp = t_1;
} else if (t <= 7.5e+77) {
tmp = b * (y + -2.0);
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = t * (b - a)
if (t <= (-2800.0d0)) then
tmp = t_1
else if (t <= 7.5d+77) then
tmp = b * (y + (-2.0d0))
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 b) {
double t_1 = t * (b - a);
double tmp;
if (t <= -2800.0) {
tmp = t_1;
} else if (t <= 7.5e+77) {
tmp = b * (y + -2.0);
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = t * (b - a) tmp = 0 if t <= -2800.0: tmp = t_1 elif t <= 7.5e+77: tmp = b * (y + -2.0) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(t * Float64(b - a)) tmp = 0.0 if (t <= -2800.0) tmp = t_1; elseif (t <= 7.5e+77) tmp = Float64(b * Float64(y + -2.0)); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = t * (b - a); tmp = 0.0; if (t <= -2800.0) tmp = t_1; elseif (t <= 7.5e+77) tmp = b * (y + -2.0); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(t * N[(b - a), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t, -2800.0], t$95$1, If[LessEqual[t, 7.5e+77], N[(b * N[(y + -2.0), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := t \cdot \left(b - a\right)\\
\mathbf{if}\;t \leq -2800:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t \leq 7.5 \cdot 10^{+77}:\\
\;\;\;\;b \cdot \left(y + -2\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if t < -2800 or 7.49999999999999955e77 < t Initial program 90.7%
Taylor expanded in t around inf
*-lowering-*.f64N/A
--lowering--.f6473.9%
Simplified73.9%
if -2800 < t < 7.49999999999999955e77Initial program 98.6%
Taylor expanded in b around inf
*-lowering-*.f64N/A
associate--l+N/A
+-lowering-+.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval32.8%
Simplified32.8%
Taylor expanded in t around 0
*-lowering-*.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval32.8%
Simplified32.8%
(FPCore (x y z t a b) :precision binary64 (if (<= b -3.6e+60) (* b (+ y -2.0)) (if (<= b 4.3e+80) (* a (- 1.0 t)) (* b (+ t -2.0)))))
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (b <= -3.6e+60) {
tmp = b * (y + -2.0);
} else if (b <= 4.3e+80) {
tmp = a * (1.0 - t);
} else {
tmp = b * (t + -2.0);
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: tmp
if (b <= (-3.6d+60)) then
tmp = b * (y + (-2.0d0))
else if (b <= 4.3d+80) then
tmp = a * (1.0d0 - t)
else
tmp = b * (t + (-2.0d0))
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (b <= -3.6e+60) {
tmp = b * (y + -2.0);
} else if (b <= 4.3e+80) {
tmp = a * (1.0 - t);
} else {
tmp = b * (t + -2.0);
}
return tmp;
}
def code(x, y, z, t, a, b): tmp = 0 if b <= -3.6e+60: tmp = b * (y + -2.0) elif b <= 4.3e+80: tmp = a * (1.0 - t) else: tmp = b * (t + -2.0) return tmp
function code(x, y, z, t, a, b) tmp = 0.0 if (b <= -3.6e+60) tmp = Float64(b * Float64(y + -2.0)); elseif (b <= 4.3e+80) tmp = Float64(a * Float64(1.0 - t)); else tmp = Float64(b * Float64(t + -2.0)); end return tmp end
function tmp_2 = code(x, y, z, t, a, b) tmp = 0.0; if (b <= -3.6e+60) tmp = b * (y + -2.0); elseif (b <= 4.3e+80) tmp = a * (1.0 - t); else tmp = b * (t + -2.0); end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := If[LessEqual[b, -3.6e+60], N[(b * N[(y + -2.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[b, 4.3e+80], N[(a * N[(1.0 - t), $MachinePrecision]), $MachinePrecision], N[(b * N[(t + -2.0), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;b \leq -3.6 \cdot 10^{+60}:\\
\;\;\;\;b \cdot \left(y + -2\right)\\
\mathbf{elif}\;b \leq 4.3 \cdot 10^{+80}:\\
\;\;\;\;a \cdot \left(1 - t\right)\\
\mathbf{else}:\\
\;\;\;\;b \cdot \left(t + -2\right)\\
\end{array}
\end{array}
if b < -3.59999999999999968e60Initial program 87.0%
Taylor expanded in b around inf
*-lowering-*.f64N/A
associate--l+N/A
+-lowering-+.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval76.9%
Simplified76.9%
Taylor expanded in t around 0
*-lowering-*.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval45.2%
Simplified45.2%
if -3.59999999999999968e60 < b < 4.30000000000000004e80Initial program 98.7%
Taylor expanded in a around inf
sub-negN/A
metadata-evalN/A
neg-mul-1N/A
distribute-lft-inN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6433.7%
Simplified33.7%
if 4.30000000000000004e80 < b Initial program 92.9%
Taylor expanded in b around inf
*-lowering-*.f64N/A
associate--l+N/A
+-lowering-+.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval86.0%
Simplified86.0%
Taylor expanded in y around 0
*-lowering-*.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval55.5%
Simplified55.5%
(FPCore (x y z t a b) :precision binary64 (let* ((t_1 (* b (+ t -2.0)))) (if (<= b -4.6e+59) t_1 (if (<= b 2.3e+80) (* a (- 1.0 t)) t_1))))
double code(double x, double y, double z, double t, double a, double b) {
double t_1 = b * (t + -2.0);
double tmp;
if (b <= -4.6e+59) {
tmp = t_1;
} else if (b <= 2.3e+80) {
tmp = a * (1.0 - t);
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: t_1
real(8) :: tmp
t_1 = b * (t + (-2.0d0))
if (b <= (-4.6d+59)) then
tmp = t_1
else if (b <= 2.3d+80) then
tmp = a * (1.0d0 - 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 b) {
double t_1 = b * (t + -2.0);
double tmp;
if (b <= -4.6e+59) {
tmp = t_1;
} else if (b <= 2.3e+80) {
tmp = a * (1.0 - t);
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y, z, t, a, b): t_1 = b * (t + -2.0) tmp = 0 if b <= -4.6e+59: tmp = t_1 elif b <= 2.3e+80: tmp = a * (1.0 - t) else: tmp = t_1 return tmp
function code(x, y, z, t, a, b) t_1 = Float64(b * Float64(t + -2.0)) tmp = 0.0 if (b <= -4.6e+59) tmp = t_1; elseif (b <= 2.3e+80) tmp = Float64(a * Float64(1.0 - t)); else tmp = t_1; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) t_1 = b * (t + -2.0); tmp = 0.0; if (b <= -4.6e+59) tmp = t_1; elseif (b <= 2.3e+80) tmp = a * (1.0 - t); else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := Block[{t$95$1 = N[(b * N[(t + -2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -4.6e+59], t$95$1, If[LessEqual[b, 2.3e+80], N[(a * N[(1.0 - t), $MachinePrecision]), $MachinePrecision], t$95$1]]]
\begin{array}{l}
\\
\begin{array}{l}
t_1 := b \cdot \left(t + -2\right)\\
\mathbf{if}\;b \leq -4.6 \cdot 10^{+59}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;b \leq 2.3 \cdot 10^{+80}:\\
\;\;\;\;a \cdot \left(1 - t\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if b < -4.60000000000000016e59 or 2.30000000000000004e80 < b Initial program 90.2%
Taylor expanded in b around inf
*-lowering-*.f64N/A
associate--l+N/A
+-lowering-+.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval81.9%
Simplified81.9%
Taylor expanded in y around 0
*-lowering-*.f64N/A
sub-negN/A
+-lowering-+.f64N/A
metadata-eval50.7%
Simplified50.7%
if -4.60000000000000016e59 < b < 2.30000000000000004e80Initial program 98.7%
Taylor expanded in a around inf
sub-negN/A
metadata-evalN/A
neg-mul-1N/A
distribute-lft-inN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6433.7%
Simplified33.7%
(FPCore (x y z t a b) :precision binary64 (if (<= b -3.2e+59) (* y b) (if (<= b 1.15e+78) (* a (- 1.0 t)) (* t b))))
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (b <= -3.2e+59) {
tmp = y * b;
} else if (b <= 1.15e+78) {
tmp = a * (1.0 - t);
} else {
tmp = t * b;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: tmp
if (b <= (-3.2d+59)) then
tmp = y * b
else if (b <= 1.15d+78) then
tmp = a * (1.0d0 - t)
else
tmp = t * b
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (b <= -3.2e+59) {
tmp = y * b;
} else if (b <= 1.15e+78) {
tmp = a * (1.0 - t);
} else {
tmp = t * b;
}
return tmp;
}
def code(x, y, z, t, a, b): tmp = 0 if b <= -3.2e+59: tmp = y * b elif b <= 1.15e+78: tmp = a * (1.0 - t) else: tmp = t * b return tmp
function code(x, y, z, t, a, b) tmp = 0.0 if (b <= -3.2e+59) tmp = Float64(y * b); elseif (b <= 1.15e+78) tmp = Float64(a * Float64(1.0 - t)); else tmp = Float64(t * b); end return tmp end
function tmp_2 = code(x, y, z, t, a, b) tmp = 0.0; if (b <= -3.2e+59) tmp = y * b; elseif (b <= 1.15e+78) tmp = a * (1.0 - t); else tmp = t * b; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := If[LessEqual[b, -3.2e+59], N[(y * b), $MachinePrecision], If[LessEqual[b, 1.15e+78], N[(a * N[(1.0 - t), $MachinePrecision]), $MachinePrecision], N[(t * b), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;b \leq -3.2 \cdot 10^{+59}:\\
\;\;\;\;y \cdot b\\
\mathbf{elif}\;b \leq 1.15 \cdot 10^{+78}:\\
\;\;\;\;a \cdot \left(1 - t\right)\\
\mathbf{else}:\\
\;\;\;\;t \cdot b\\
\end{array}
\end{array}
if b < -3.19999999999999982e59Initial program 87.0%
Taylor expanded in x around inf
Simplified82.8%
Taylor expanded in y around inf
*-lowering-*.f6441.0%
Simplified41.0%
if -3.19999999999999982e59 < b < 1.1500000000000001e78Initial program 98.7%
Taylor expanded in a around inf
sub-negN/A
metadata-evalN/A
neg-mul-1N/A
distribute-lft-inN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6433.7%
Simplified33.7%
if 1.1500000000000001e78 < b Initial program 92.9%
Taylor expanded in t around inf
*-lowering-*.f64N/A
--lowering--.f6444.5%
Simplified44.5%
Taylor expanded in b around inf
*-commutativeN/A
*-lowering-*.f6442.4%
Simplified42.4%
Final simplification36.9%
(FPCore (x y z t a b) :precision binary64 (if (<= t -6e+82) (* t b) (if (<= t 2.7e+105) (* y b) (* t b))))
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (t <= -6e+82) {
tmp = t * b;
} else if (t <= 2.7e+105) {
tmp = y * b;
} else {
tmp = t * b;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: tmp
if (t <= (-6d+82)) then
tmp = t * b
else if (t <= 2.7d+105) then
tmp = y * b
else
tmp = t * b
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (t <= -6e+82) {
tmp = t * b;
} else if (t <= 2.7e+105) {
tmp = y * b;
} else {
tmp = t * b;
}
return tmp;
}
def code(x, y, z, t, a, b): tmp = 0 if t <= -6e+82: tmp = t * b elif t <= 2.7e+105: tmp = y * b else: tmp = t * b return tmp
function code(x, y, z, t, a, b) tmp = 0.0 if (t <= -6e+82) tmp = Float64(t * b); elseif (t <= 2.7e+105) tmp = Float64(y * b); else tmp = Float64(t * b); end return tmp end
function tmp_2 = code(x, y, z, t, a, b) tmp = 0.0; if (t <= -6e+82) tmp = t * b; elseif (t <= 2.7e+105) tmp = y * b; else tmp = t * b; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := If[LessEqual[t, -6e+82], N[(t * b), $MachinePrecision], If[LessEqual[t, 2.7e+105], N[(y * b), $MachinePrecision], N[(t * b), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;t \leq -6 \cdot 10^{+82}:\\
\;\;\;\;t \cdot b\\
\mathbf{elif}\;t \leq 2.7 \cdot 10^{+105}:\\
\;\;\;\;y \cdot b\\
\mathbf{else}:\\
\;\;\;\;t \cdot b\\
\end{array}
\end{array}
if t < -5.99999999999999978e82 or 2.70000000000000016e105 < t Initial program 89.3%
Taylor expanded in t around inf
*-lowering-*.f64N/A
--lowering--.f6478.7%
Simplified78.7%
Taylor expanded in b around inf
*-commutativeN/A
*-lowering-*.f6452.9%
Simplified52.9%
if -5.99999999999999978e82 < t < 2.70000000000000016e105Initial program 98.8%
Taylor expanded in x around inf
Simplified49.4%
Taylor expanded in y around inf
*-lowering-*.f6424.8%
Simplified24.8%
Final simplification35.1%
(FPCore (x y z t a b) :precision binary64 (if (<= x -1.7e+122) x (if (<= x 9.2e+18) z x)))
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (x <= -1.7e+122) {
tmp = x;
} else if (x <= 9.2e+18) {
tmp = z;
} else {
tmp = x;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: tmp
if (x <= (-1.7d+122)) then
tmp = x
else if (x <= 9.2d+18) then
tmp = 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 b) {
double tmp;
if (x <= -1.7e+122) {
tmp = x;
} else if (x <= 9.2e+18) {
tmp = z;
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z, t, a, b): tmp = 0 if x <= -1.7e+122: tmp = x elif x <= 9.2e+18: tmp = z else: tmp = x return tmp
function code(x, y, z, t, a, b) tmp = 0.0 if (x <= -1.7e+122) tmp = x; elseif (x <= 9.2e+18) tmp = z; else tmp = x; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) tmp = 0.0; if (x <= -1.7e+122) tmp = x; elseif (x <= 9.2e+18) tmp = z; else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := If[LessEqual[x, -1.7e+122], x, If[LessEqual[x, 9.2e+18], z, x]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -1.7 \cdot 10^{+122}:\\
\;\;\;\;x\\
\mathbf{elif}\;x \leq 9.2 \cdot 10^{+18}:\\
\;\;\;\;z\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
if x < -1.7e122 or 9.2e18 < x Initial program 97.8%
Taylor expanded in x around inf
Simplified35.0%
if -1.7e122 < x < 9.2e18Initial program 93.8%
Taylor expanded in z around inf
sub-negN/A
neg-mul-1N/A
+-commutativeN/A
neg-mul-1N/A
metadata-evalN/A
distribute-neg-inN/A
metadata-evalN/A
sub-negN/A
mul-1-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
distribute-lft-inN/A
metadata-evalN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6434.6%
Simplified34.6%
Taylor expanded in y around 0
Simplified16.3%
(FPCore (x y z t a b) :precision binary64 (if (<= a -2.2e+188) a (if (<= a 2.1e+143) x a)))
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (a <= -2.2e+188) {
tmp = a;
} else if (a <= 2.1e+143) {
tmp = x;
} else {
tmp = a;
}
return tmp;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
real(8) :: tmp
if (a <= (-2.2d+188)) then
tmp = a
else if (a <= 2.1d+143) then
tmp = x
else
tmp = a
end if
code = tmp
end function
public static double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (a <= -2.2e+188) {
tmp = a;
} else if (a <= 2.1e+143) {
tmp = x;
} else {
tmp = a;
}
return tmp;
}
def code(x, y, z, t, a, b): tmp = 0 if a <= -2.2e+188: tmp = a elif a <= 2.1e+143: tmp = x else: tmp = a return tmp
function code(x, y, z, t, a, b) tmp = 0.0 if (a <= -2.2e+188) tmp = a; elseif (a <= 2.1e+143) tmp = x; else tmp = a; end return tmp end
function tmp_2 = code(x, y, z, t, a, b) tmp = 0.0; if (a <= -2.2e+188) tmp = a; elseif (a <= 2.1e+143) tmp = x; else tmp = a; end tmp_2 = tmp; end
code[x_, y_, z_, t_, a_, b_] := If[LessEqual[a, -2.2e+188], a, If[LessEqual[a, 2.1e+143], x, a]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -2.2 \cdot 10^{+188}:\\
\;\;\;\;a\\
\mathbf{elif}\;a \leq 2.1 \cdot 10^{+143}:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;a\\
\end{array}
\end{array}
if a < -2.19999999999999999e188 or 2.09999999999999988e143 < a Initial program 93.5%
Taylor expanded in a around inf
sub-negN/A
metadata-evalN/A
neg-mul-1N/A
distribute-lft-inN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6458.3%
Simplified58.3%
Taylor expanded in t around 0
Simplified28.0%
if -2.19999999999999999e188 < a < 2.09999999999999988e143Initial program 95.9%
Taylor expanded in x around inf
Simplified18.4%
(FPCore (x y z t a b) :precision binary64 a)
double code(double x, double y, double z, double t, double a, double b) {
return a;
}
real(8) function code(x, y, z, t, a, b)
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), intent (in) :: b
code = a
end function
public static double code(double x, double y, double z, double t, double a, double b) {
return a;
}
def code(x, y, z, t, a, b): return a
function code(x, y, z, t, a, b) return a end
function tmp = code(x, y, z, t, a, b) tmp = a; end
code[x_, y_, z_, t_, a_, b_] := a
\begin{array}{l}
\\
a
\end{array}
Initial program 95.3%
Taylor expanded in a around inf
sub-negN/A
metadata-evalN/A
neg-mul-1N/A
distribute-lft-inN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
*-lowering-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
neg-mul-1N/A
sub-negN/A
--lowering--.f6426.3%
Simplified26.3%
Taylor expanded in t around 0
Simplified10.3%
herbie shell --seed 2024138
(FPCore (x y z t a b)
:name "Statistics.Distribution.Beta:$centropy from math-functions-0.1.5.2"
:precision binary64
(+ (- (- x (* (- y 1.0) z)) (* (- t 1.0) a)) (* (- (+ y t) 2.0) b)))