
(FPCore (x y z) :precision binary64 (+ x (* (* (- y x) 6.0) (- (/ 2.0 3.0) z))))
double code(double x, double y, double z) {
return x + (((y - x) * 6.0) * ((2.0 / 3.0) - z));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + (((y - x) * 6.0d0) * ((2.0d0 / 3.0d0) - z))
end function
public static double code(double x, double y, double z) {
return x + (((y - x) * 6.0) * ((2.0 / 3.0) - z));
}
def code(x, y, z): return x + (((y - x) * 6.0) * ((2.0 / 3.0) - z))
function code(x, y, z) return Float64(x + Float64(Float64(Float64(y - x) * 6.0) * Float64(Float64(2.0 / 3.0) - z))) end
function tmp = code(x, y, z) tmp = x + (((y - x) * 6.0) * ((2.0 / 3.0) - z)); end
code[x_, y_, z_] := N[(x + N[(N[(N[(y - x), $MachinePrecision] * 6.0), $MachinePrecision] * N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \left(\left(y - x\right) \cdot 6\right) \cdot \left(\frac{2}{3} - z\right)
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 13 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z) :precision binary64 (+ x (* (* (- y x) 6.0) (- (/ 2.0 3.0) z))))
double code(double x, double y, double z) {
return x + (((y - x) * 6.0) * ((2.0 / 3.0) - z));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + (((y - x) * 6.0d0) * ((2.0d0 / 3.0d0) - z))
end function
public static double code(double x, double y, double z) {
return x + (((y - x) * 6.0) * ((2.0 / 3.0) - z));
}
def code(x, y, z): return x + (((y - x) * 6.0) * ((2.0 / 3.0) - z))
function code(x, y, z) return Float64(x + Float64(Float64(Float64(y - x) * 6.0) * Float64(Float64(2.0 / 3.0) - z))) end
function tmp = code(x, y, z) tmp = x + (((y - x) * 6.0) * ((2.0 / 3.0) - z)); end
code[x_, y_, z_] := N[(x + N[(N[(N[(y - x), $MachinePrecision] * 6.0), $MachinePrecision] * N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \left(\left(y - x\right) \cdot 6\right) \cdot \left(\frac{2}{3} - z\right)
\end{array}
(FPCore (x y z) :precision binary64 (fma (fma 6.0 z -4.0) (- x y) x))
double code(double x, double y, double z) {
return fma(fma(6.0, z, -4.0), (x - y), x);
}
function code(x, y, z) return fma(fma(6.0, z, -4.0), Float64(x - y), x) end
code[x_, y_, z_] := N[(N[(6.0 * z + -4.0), $MachinePrecision] * N[(x - y), $MachinePrecision] + x), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(\mathsf{fma}\left(6, z, -4\right), x - y, x\right)
\end{array}
Initial program 99.6%
Taylor expanded in x around 0
Simplified99.8%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* y (* z -6.0))) (t_1 (- (/ 2.0 3.0) z)))
(if (<= t_1 -5e+116)
(* 6.0 (* z x))
(if (<= t_1 -200000.0)
t_0
(if (<= t_1 1.0)
(fma 4.0 (- y x) x)
(if (<= t_1 1e+226) (* x (fma 6.0 z -3.0)) t_0))))))
double code(double x, double y, double z) {
double t_0 = y * (z * -6.0);
double t_1 = (2.0 / 3.0) - z;
double tmp;
if (t_1 <= -5e+116) {
tmp = 6.0 * (z * x);
} else if (t_1 <= -200000.0) {
tmp = t_0;
} else if (t_1 <= 1.0) {
tmp = fma(4.0, (y - x), x);
} else if (t_1 <= 1e+226) {
tmp = x * fma(6.0, z, -3.0);
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(y * Float64(z * -6.0)) t_1 = Float64(Float64(2.0 / 3.0) - z) tmp = 0.0 if (t_1 <= -5e+116) tmp = Float64(6.0 * Float64(z * x)); elseif (t_1 <= -200000.0) tmp = t_0; elseif (t_1 <= 1.0) tmp = fma(4.0, Float64(y - x), x); elseif (t_1 <= 1e+226) tmp = Float64(x * fma(6.0, z, -3.0)); else tmp = t_0; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(y * N[(z * -6.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]}, If[LessEqual[t$95$1, -5e+116], N[(6.0 * N[(z * x), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, -200000.0], t$95$0, If[LessEqual[t$95$1, 1.0], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[t$95$1, 1e+226], N[(x * N[(6.0 * z + -3.0), $MachinePrecision]), $MachinePrecision], t$95$0]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(z \cdot -6\right)\\
t_1 := \frac{2}{3} - z\\
\mathbf{if}\;t\_1 \leq -5 \cdot 10^{+116}:\\
\;\;\;\;6 \cdot \left(z \cdot x\right)\\
\mathbf{elif}\;t\_1 \leq -200000:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;t\_1 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;t\_1 \leq 10^{+226}:\\
\;\;\;\;x \cdot \mathsf{fma}\left(6, z, -3\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -5.00000000000000025e116Initial program 99.8%
Taylor expanded in y around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
associate-*r*N/A
metadata-evalN/A
lower-fma.f6465.6
Simplified65.6%
Taylor expanded in z around inf
lower-*.f64N/A
lower-*.f6465.7
Simplified65.7%
if -5.00000000000000025e116 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -2e5 or 9.99999999999999961e225 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.8%
Taylor expanded in x around 0
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
metadata-evalN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f6465.3
Simplified65.3%
Taylor expanded in z around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6464.1
Simplified64.1%
if -2e5 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 1Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6497.4
Simplified97.4%
if 1 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 9.99999999999999961e225Initial program 99.7%
Taylor expanded in x around inf
remove-double-negN/A
neg-mul-1N/A
distribute-lft-neg-inN/A
distribute-rgt-neg-inN/A
distribute-neg-inN/A
metadata-evalN/A
distribute-lft-neg-inN/A
metadata-evalN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
associate-*r*N/A
mul-1-negN/A
distribute-rgt-neg-inN/A
lower-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-neg-inN/A
distribute-lft-neg-inN/A
metadata-evalN/A
metadata-evalN/A
Simplified57.1%
Final simplification77.0%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* y (* z -6.0))) (t_1 (- (/ 2.0 3.0) z)))
(if (<= t_1 -5e+116)
(* 6.0 (* z x))
(if (<= t_1 -200000.0)
t_0
(if (<= t_1 2.0)
(fma 4.0 (- y x) x)
(if (<= t_1 1e+226) (* x (* 6.0 z)) t_0))))))
double code(double x, double y, double z) {
double t_0 = y * (z * -6.0);
double t_1 = (2.0 / 3.0) - z;
double tmp;
if (t_1 <= -5e+116) {
tmp = 6.0 * (z * x);
} else if (t_1 <= -200000.0) {
tmp = t_0;
} else if (t_1 <= 2.0) {
tmp = fma(4.0, (y - x), x);
} else if (t_1 <= 1e+226) {
tmp = x * (6.0 * z);
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(y * Float64(z * -6.0)) t_1 = Float64(Float64(2.0 / 3.0) - z) tmp = 0.0 if (t_1 <= -5e+116) tmp = Float64(6.0 * Float64(z * x)); elseif (t_1 <= -200000.0) tmp = t_0; elseif (t_1 <= 2.0) tmp = fma(4.0, Float64(y - x), x); elseif (t_1 <= 1e+226) tmp = Float64(x * Float64(6.0 * z)); else tmp = t_0; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(y * N[(z * -6.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]}, If[LessEqual[t$95$1, -5e+116], N[(6.0 * N[(z * x), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, -200000.0], t$95$0, If[LessEqual[t$95$1, 2.0], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[t$95$1, 1e+226], N[(x * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], t$95$0]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(z \cdot -6\right)\\
t_1 := \frac{2}{3} - z\\
\mathbf{if}\;t\_1 \leq -5 \cdot 10^{+116}:\\
\;\;\;\;6 \cdot \left(z \cdot x\right)\\
\mathbf{elif}\;t\_1 \leq -200000:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;t\_1 \leq 2:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;t\_1 \leq 10^{+226}:\\
\;\;\;\;x \cdot \left(6 \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -5.00000000000000025e116Initial program 99.8%
Taylor expanded in y around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
associate-*r*N/A
metadata-evalN/A
lower-fma.f6465.6
Simplified65.6%
Taylor expanded in z around inf
lower-*.f64N/A
lower-*.f6465.7
Simplified65.7%
if -5.00000000000000025e116 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -2e5 or 9.99999999999999961e225 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.8%
Taylor expanded in x around 0
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
metadata-evalN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f6465.3
Simplified65.3%
Taylor expanded in z around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6464.1
Simplified64.1%
if -2e5 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 2Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6496.6
Simplified96.6%
if 2 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 9.99999999999999961e225Initial program 99.7%
Taylor expanded in x around inf
remove-double-negN/A
neg-mul-1N/A
distribute-lft-neg-inN/A
distribute-rgt-neg-inN/A
distribute-neg-inN/A
metadata-evalN/A
distribute-lft-neg-inN/A
metadata-evalN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
associate-*r*N/A
mul-1-negN/A
distribute-rgt-neg-inN/A
lower-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-neg-inN/A
distribute-lft-neg-inN/A
metadata-evalN/A
metadata-evalN/A
Simplified56.3%
Taylor expanded in z around inf
metadata-evalN/A
distribute-lft-neg-inN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
distribute-lft-neg-outN/A
distribute-rgt-neg-inN/A
metadata-evalN/A
lower-*.f6454.7
Simplified54.7%
Final simplification76.4%
(FPCore (x y z) :precision binary64 (let* ((t_0 (- (/ 2.0 3.0) z)) (t_1 (* (- y x) (* z -6.0)))) (if (<= t_0 -200000.0) t_1 (if (<= t_0 2.0) (fma 4.0 (- y x) x) t_1))))
double code(double x, double y, double z) {
double t_0 = (2.0 / 3.0) - z;
double t_1 = (y - x) * (z * -6.0);
double tmp;
if (t_0 <= -200000.0) {
tmp = t_1;
} else if (t_0 <= 2.0) {
tmp = fma(4.0, (y - x), x);
} else {
tmp = t_1;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(Float64(2.0 / 3.0) - z) t_1 = Float64(Float64(y - x) * Float64(z * -6.0)) tmp = 0.0 if (t_0 <= -200000.0) tmp = t_1; elseif (t_0 <= 2.0) tmp = fma(4.0, Float64(y - x), x); else tmp = t_1; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]}, Block[{t$95$1 = N[(N[(y - x), $MachinePrecision] * N[(z * -6.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -200000.0], t$95$1, If[LessEqual[t$95$0, 2.0], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{2}{3} - z\\
t_1 := \left(y - x\right) \cdot \left(z \cdot -6\right)\\
\mathbf{if}\;t\_0 \leq -200000:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 2:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -2e5 or 2 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.8%
lift--.f64N/A
lift-/.f64N/A
lift--.f64N/A
lift-*.f64N/A
*-commutativeN/A
lower-*.f6499.8
lift-/.f64N/A
metadata-eval99.8
Applied egg-rr99.8%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
lower--.f64N/A
*-commutativeN/A
lower-*.f6498.9
Simplified98.9%
if -2e5 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 2Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6496.6
Simplified96.6%
(FPCore (x y z) :precision binary64 (let* ((t_0 (- (/ 2.0 3.0) z)) (t_1 (* 6.0 (* z (- x y))))) (if (<= t_0 -200000.0) t_1 (if (<= t_0 2.0) (fma 4.0 (- y x) x) t_1))))
double code(double x, double y, double z) {
double t_0 = (2.0 / 3.0) - z;
double t_1 = 6.0 * (z * (x - y));
double tmp;
if (t_0 <= -200000.0) {
tmp = t_1;
} else if (t_0 <= 2.0) {
tmp = fma(4.0, (y - x), x);
} else {
tmp = t_1;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(Float64(2.0 / 3.0) - z) t_1 = Float64(6.0 * Float64(z * Float64(x - y))) tmp = 0.0 if (t_0 <= -200000.0) tmp = t_1; elseif (t_0 <= 2.0) tmp = fma(4.0, Float64(y - x), x); else tmp = t_1; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]}, Block[{t$95$1 = N[(6.0 * N[(z * N[(x - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -200000.0], t$95$1, If[LessEqual[t$95$0, 2.0], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{2}{3} - z\\
t_1 := 6 \cdot \left(z \cdot \left(x - y\right)\right)\\
\mathbf{if}\;t\_0 \leq -200000:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 2:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -2e5 or 2 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.8%
Taylor expanded in z around inf
metadata-evalN/A
distribute-lft-neg-inN/A
distribute-rgt-neg-inN/A
lower-*.f64N/A
distribute-rgt-neg-inN/A
neg-mul-1N/A
lower-*.f64N/A
sub-negN/A
neg-mul-1N/A
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
mul-1-negN/A
sub-negN/A
lower--.f6498.8
Simplified98.8%
if -2e5 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 2Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6496.6
Simplified96.6%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (- (/ 2.0 3.0) z)) (t_1 (- (* z y))))
(if (<= t_0 -200000.0)
t_1
(if (<= t_0 100000000.0) (fma 4.0 (- y x) x) t_1))))
double code(double x, double y, double z) {
double t_0 = (2.0 / 3.0) - z;
double t_1 = -(z * y);
double tmp;
if (t_0 <= -200000.0) {
tmp = t_1;
} else if (t_0 <= 100000000.0) {
tmp = fma(4.0, (y - x), x);
} else {
tmp = t_1;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(Float64(2.0 / 3.0) - z) t_1 = Float64(-Float64(z * y)) tmp = 0.0 if (t_0 <= -200000.0) tmp = t_1; elseif (t_0 <= 100000000.0) tmp = fma(4.0, Float64(y - x), x); else tmp = t_1; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]}, Block[{t$95$1 = (-N[(z * y), $MachinePrecision])}, If[LessEqual[t$95$0, -200000.0], t$95$1, If[LessEqual[t$95$0, 100000000.0], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], t$95$1]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{2}{3} - z\\
t_1 := -z \cdot y\\
\mathbf{if}\;t\_0 \leq -200000:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 100000000:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -2e5 or 1e8 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.8%
Taylor expanded in x around 0
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
metadata-evalN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f6452.5
Simplified52.5%
Taylor expanded in z around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6452.1
Simplified52.1%
Taylor expanded in z around -inf
mul-1-negN/A
lower-neg.f6431.9
Simplified31.9%
if -2e5 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 1e8Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6495.1
Simplified95.1%
Final simplification59.6%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (- (* z y))))
(if (<= z -35000000000.0)
t_0
(if (<= z 1.96e-289) (* x -3.0) (if (<= z 0.000465) (* y 4.0) t_0)))))
double code(double x, double y, double z) {
double t_0 = -(z * y);
double tmp;
if (z <= -35000000000.0) {
tmp = t_0;
} else if (z <= 1.96e-289) {
tmp = x * -3.0;
} else if (z <= 0.000465) {
tmp = y * 4.0;
} else {
tmp = t_0;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: tmp
t_0 = -(z * y)
if (z <= (-35000000000.0d0)) then
tmp = t_0
else if (z <= 1.96d-289) then
tmp = x * (-3.0d0)
else if (z <= 0.000465d0) then
tmp = y * 4.0d0
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = -(z * y);
double tmp;
if (z <= -35000000000.0) {
tmp = t_0;
} else if (z <= 1.96e-289) {
tmp = x * -3.0;
} else if (z <= 0.000465) {
tmp = y * 4.0;
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = -(z * y) tmp = 0 if z <= -35000000000.0: tmp = t_0 elif z <= 1.96e-289: tmp = x * -3.0 elif z <= 0.000465: tmp = y * 4.0 else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(-Float64(z * y)) tmp = 0.0 if (z <= -35000000000.0) tmp = t_0; elseif (z <= 1.96e-289) tmp = Float64(x * -3.0); elseif (z <= 0.000465) tmp = Float64(y * 4.0); else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = -(z * y); tmp = 0.0; if (z <= -35000000000.0) tmp = t_0; elseif (z <= 1.96e-289) tmp = x * -3.0; elseif (z <= 0.000465) tmp = y * 4.0; else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = (-N[(z * y), $MachinePrecision])}, If[LessEqual[z, -35000000000.0], t$95$0, If[LessEqual[z, 1.96e-289], N[(x * -3.0), $MachinePrecision], If[LessEqual[z, 0.000465], N[(y * 4.0), $MachinePrecision], t$95$0]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := -z \cdot y\\
\mathbf{if}\;z \leq -35000000000:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 1.96 \cdot 10^{-289}:\\
\;\;\;\;x \cdot -3\\
\mathbf{elif}\;z \leq 0.000465:\\
\;\;\;\;y \cdot 4\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if z < -3.5e10 or 4.6500000000000003e-4 < z Initial program 99.8%
Taylor expanded in x around 0
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
metadata-evalN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f6452.2
Simplified52.2%
Taylor expanded in z around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6451.8
Simplified51.8%
Taylor expanded in z around -inf
mul-1-negN/A
lower-neg.f6431.7
Simplified31.7%
if -3.5e10 < z < 1.96e-289Initial program 99.4%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6493.9
Simplified93.9%
Taylor expanded in y around 0
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f6454.2
Simplified54.2%
if 1.96e-289 < z < 4.6500000000000003e-4Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6497.8
Simplified97.8%
Taylor expanded in y around inf
*-commutativeN/A
lower-*.f6456.5
Simplified56.5%
Final simplification41.9%
(FPCore (x y z) :precision binary64 (let* ((t_0 (* y (fma z -6.0 4.0)))) (if (<= y -116000.0) t_0 (if (<= y 2.5e-51) (* x (fma 6.0 z -3.0)) t_0))))
double code(double x, double y, double z) {
double t_0 = y * fma(z, -6.0, 4.0);
double tmp;
if (y <= -116000.0) {
tmp = t_0;
} else if (y <= 2.5e-51) {
tmp = x * fma(6.0, z, -3.0);
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(y * fma(z, -6.0, 4.0)) tmp = 0.0 if (y <= -116000.0) tmp = t_0; elseif (y <= 2.5e-51) tmp = Float64(x * fma(6.0, z, -3.0)); else tmp = t_0; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(y * N[(z * -6.0 + 4.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[y, -116000.0], t$95$0, If[LessEqual[y, 2.5e-51], N[(x * N[(6.0 * z + -3.0), $MachinePrecision]), $MachinePrecision], t$95$0]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \mathsf{fma}\left(z, -6, 4\right)\\
\mathbf{if}\;y \leq -116000:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;y \leq 2.5 \cdot 10^{-51}:\\
\;\;\;\;x \cdot \mathsf{fma}\left(6, z, -3\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if y < -116000 or 2.50000000000000002e-51 < y Initial program 99.7%
Taylor expanded in x around 0
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
metadata-evalN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f6481.9
Simplified81.9%
if -116000 < y < 2.50000000000000002e-51Initial program 99.5%
Taylor expanded in x around inf
remove-double-negN/A
neg-mul-1N/A
distribute-lft-neg-inN/A
distribute-rgt-neg-inN/A
distribute-neg-inN/A
metadata-evalN/A
distribute-lft-neg-inN/A
metadata-evalN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
associate-*r*N/A
mul-1-negN/A
distribute-rgt-neg-inN/A
lower-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-neg-inN/A
distribute-lft-neg-inN/A
metadata-evalN/A
metadata-evalN/A
Simplified85.6%
(FPCore (x y z) :precision binary64 (if (<= z -14.6) (* x (* 6.0 z)) (if (<= z 0.5) (fma 4.0 (- y x) x) (* 6.0 (* z x)))))
double code(double x, double y, double z) {
double tmp;
if (z <= -14.6) {
tmp = x * (6.0 * z);
} else if (z <= 0.5) {
tmp = fma(4.0, (y - x), x);
} else {
tmp = 6.0 * (z * x);
}
return tmp;
}
function code(x, y, z) tmp = 0.0 if (z <= -14.6) tmp = Float64(x * Float64(6.0 * z)); elseif (z <= 0.5) tmp = fma(4.0, Float64(y - x), x); else tmp = Float64(6.0 * Float64(z * x)); end return tmp end
code[x_, y_, z_] := If[LessEqual[z, -14.6], N[(x * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 0.5], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], N[(6.0 * N[(z * x), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -14.6:\\
\;\;\;\;x \cdot \left(6 \cdot z\right)\\
\mathbf{elif}\;z \leq 0.5:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{else}:\\
\;\;\;\;6 \cdot \left(z \cdot x\right)\\
\end{array}
\end{array}
if z < -14.5999999999999996Initial program 99.8%
Taylor expanded in x around inf
remove-double-negN/A
neg-mul-1N/A
distribute-lft-neg-inN/A
distribute-rgt-neg-inN/A
distribute-neg-inN/A
metadata-evalN/A
distribute-lft-neg-inN/A
metadata-evalN/A
+-commutativeN/A
metadata-evalN/A
sub-negN/A
associate-*r*N/A
mul-1-negN/A
distribute-rgt-neg-inN/A
lower-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-neg-inN/A
distribute-lft-neg-inN/A
metadata-evalN/A
metadata-evalN/A
Simplified53.6%
Taylor expanded in z around inf
metadata-evalN/A
distribute-lft-neg-inN/A
associate-*l*N/A
distribute-rgt-neg-inN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
distribute-lft-neg-outN/A
distribute-rgt-neg-inN/A
metadata-evalN/A
lower-*.f6452.4
Simplified52.4%
if -14.5999999999999996 < z < 0.5Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6496.6
Simplified96.6%
if 0.5 < z Initial program 99.8%
Taylor expanded in y around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
associate-*r*N/A
metadata-evalN/A
lower-fma.f6456.0
Simplified56.0%
Taylor expanded in z around inf
lower-*.f64N/A
lower-*.f6456.1
Simplified56.1%
Final simplification72.4%
(FPCore (x y z) :precision binary64 (let* ((t_0 (* 6.0 (* z x)))) (if (<= z -14.6) t_0 (if (<= z 0.5) (fma 4.0 (- y x) x) t_0))))
double code(double x, double y, double z) {
double t_0 = 6.0 * (z * x);
double tmp;
if (z <= -14.6) {
tmp = t_0;
} else if (z <= 0.5) {
tmp = fma(4.0, (y - x), x);
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(6.0 * Float64(z * x)) tmp = 0.0 if (z <= -14.6) tmp = t_0; elseif (z <= 0.5) tmp = fma(4.0, Float64(y - x), x); else tmp = t_0; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(6.0 * N[(z * x), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -14.6], t$95$0, If[LessEqual[z, 0.5], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], t$95$0]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 6 \cdot \left(z \cdot x\right)\\
\mathbf{if}\;z \leq -14.6:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 0.5:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if z < -14.5999999999999996 or 0.5 < z Initial program 99.8%
Taylor expanded in y around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
sub-negN/A
mul-1-negN/A
distribute-lft-inN/A
metadata-evalN/A
+-commutativeN/A
associate-*r*N/A
metadata-evalN/A
lower-fma.f6454.8
Simplified54.8%
Taylor expanded in z around inf
lower-*.f64N/A
lower-*.f6454.2
Simplified54.2%
if -14.5999999999999996 < z < 0.5Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6496.6
Simplified96.6%
Final simplification72.4%
(FPCore (x y z) :precision binary64 (if (<= y -30000000000.0) (* y 4.0) (if (<= y 1.5e-54) (* x -3.0) (* y 4.0))))
double code(double x, double y, double z) {
double tmp;
if (y <= -30000000000.0) {
tmp = y * 4.0;
} else if (y <= 1.5e-54) {
tmp = x * -3.0;
} else {
tmp = y * 4.0;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= (-30000000000.0d0)) then
tmp = y * 4.0d0
else if (y <= 1.5d-54) then
tmp = x * (-3.0d0)
else
tmp = y * 4.0d0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= -30000000000.0) {
tmp = y * 4.0;
} else if (y <= 1.5e-54) {
tmp = x * -3.0;
} else {
tmp = y * 4.0;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= -30000000000.0: tmp = y * 4.0 elif y <= 1.5e-54: tmp = x * -3.0 else: tmp = y * 4.0 return tmp
function code(x, y, z) tmp = 0.0 if (y <= -30000000000.0) tmp = Float64(y * 4.0); elseif (y <= 1.5e-54) tmp = Float64(x * -3.0); else tmp = Float64(y * 4.0); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= -30000000000.0) tmp = y * 4.0; elseif (y <= 1.5e-54) tmp = x * -3.0; else tmp = y * 4.0; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, -30000000000.0], N[(y * 4.0), $MachinePrecision], If[LessEqual[y, 1.5e-54], N[(x * -3.0), $MachinePrecision], N[(y * 4.0), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq -30000000000:\\
\;\;\;\;y \cdot 4\\
\mathbf{elif}\;y \leq 1.5 \cdot 10^{-54}:\\
\;\;\;\;x \cdot -3\\
\mathbf{else}:\\
\;\;\;\;y \cdot 4\\
\end{array}
\end{array}
if y < -3e10 or 1.50000000000000005e-54 < y Initial program 99.7%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6440.9
Simplified40.9%
Taylor expanded in y around inf
*-commutativeN/A
lower-*.f6435.1
Simplified35.1%
if -3e10 < y < 1.50000000000000005e-54Initial program 99.4%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6446.4
Simplified46.4%
Taylor expanded in y around 0
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f6440.1
Simplified40.1%
(FPCore (x y z) :precision binary64 (* x -3.0))
double code(double x, double y, double z) {
return x * -3.0;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x * (-3.0d0)
end function
public static double code(double x, double y, double z) {
return x * -3.0;
}
def code(x, y, z): return x * -3.0
function code(x, y, z) return Float64(x * -3.0) end
function tmp = code(x, y, z) tmp = x * -3.0; end
code[x_, y_, z_] := N[(x * -3.0), $MachinePrecision]
\begin{array}{l}
\\
x \cdot -3
\end{array}
Initial program 99.6%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6443.5
Simplified43.5%
Taylor expanded in y around 0
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f6423.4
Simplified23.4%
(FPCore (x y z) :precision binary64 (- x))
double code(double x, double y, double z) {
return -x;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = -x
end function
public static double code(double x, double y, double z) {
return -x;
}
def code(x, y, z): return -x
function code(x, y, z) return Float64(-x) end
function tmp = code(x, y, z) tmp = -x; end
code[x_, y_, z_] := (-x)
\begin{array}{l}
\\
-x
\end{array}
Initial program 99.6%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6443.5
Simplified43.5%
Taylor expanded in y around 0
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f6423.4
Simplified23.4%
Taylor expanded in x around -inf
mul-1-negN/A
lower-neg.f646.5
Simplified6.5%
herbie shell --seed 2024214
(FPCore (x y z)
:name "Data.Colour.RGBSpace.HSL:hsl from colour-2.3.3, D"
:precision binary64
(+ x (* (* (- y x) 6.0) (- (/ 2.0 3.0) z))))