
(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 12 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.5%
Taylor expanded in x around 0
Simplified99.8%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (- (/ 2.0 3.0) z)) (t_1 (* -6.0 (* z y))))
(if (<= t_0 -2e+242)
(* y (* z -6.0))
(if (<= t_0 -1e+104)
(* x (* 6.0 z))
(if (<= t_0 -500.0)
t_1
(if (<= t_0 1.0)
(fma 4.0 (- y x) x)
(if (<= t_0 1e+174) (* x (fma 6.0 z -3.0)) t_1)))))))
double code(double x, double y, double z) {
double t_0 = (2.0 / 3.0) - z;
double t_1 = -6.0 * (z * y);
double tmp;
if (t_0 <= -2e+242) {
tmp = y * (z * -6.0);
} else if (t_0 <= -1e+104) {
tmp = x * (6.0 * z);
} else if (t_0 <= -500.0) {
tmp = t_1;
} else if (t_0 <= 1.0) {
tmp = fma(4.0, (y - x), x);
} else if (t_0 <= 1e+174) {
tmp = x * fma(6.0, z, -3.0);
} 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 * y)) tmp = 0.0 if (t_0 <= -2e+242) tmp = Float64(y * Float64(z * -6.0)); elseif (t_0 <= -1e+104) tmp = Float64(x * Float64(6.0 * z)); elseif (t_0 <= -500.0) tmp = t_1; elseif (t_0 <= 1.0) tmp = fma(4.0, Float64(y - x), x); elseif (t_0 <= 1e+174) tmp = Float64(x * fma(6.0, z, -3.0)); 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 * y), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -2e+242], N[(y * N[(z * -6.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, -1e+104], N[(x * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, -500.0], t$95$1, If[LessEqual[t$95$0, 1.0], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[t$95$0, 1e+174], N[(x * N[(6.0 * z + -3.0), $MachinePrecision]), $MachinePrecision], t$95$1]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{2}{3} - z\\
t_1 := -6 \cdot \left(z \cdot y\right)\\
\mathbf{if}\;t\_0 \leq -2 \cdot 10^{+242}:\\
\;\;\;\;y \cdot \left(z \cdot -6\right)\\
\mathbf{elif}\;t\_0 \leq -1 \cdot 10^{+104}:\\
\;\;\;\;x \cdot \left(6 \cdot z\right)\\
\mathbf{elif}\;t\_0 \leq -500:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;t\_0 \leq 10^{+174}:\\
\;\;\;\;x \cdot \mathsf{fma}\left(6, z, -3\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -2.0000000000000001e242Initial program 99.9%
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--.f6499.8
Simplified99.8%
Taylor expanded in x around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6479.6
Simplified79.6%
if -2.0000000000000001e242 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -1e104Initial 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--.f6499.9
Simplified99.9%
Taylor expanded in x around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
lower-*.f6473.9
Simplified73.9%
if -1e104 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -500 or 1.00000000000000007e174 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.7%
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--.f6497.3
Simplified97.3%
Taylor expanded in x around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6466.8
Simplified66.8%
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6466.8
Applied egg-rr66.8%
if -500 < (-.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.0
Simplified97.0%
if 1 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 1.00000000000000007e174Initial 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
Simplified58.6%
Final simplification81.0%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* x (* 6.0 z))) (t_1 (- (/ 2.0 3.0) z)) (t_2 (* -6.0 (* z y))))
(if (<= t_1 -2e+242)
(* y (* z -6.0))
(if (<= t_1 -1e+104)
t_0
(if (<= t_1 -500.0)
t_2
(if (<= t_1 1.0)
(fma 4.0 (- y x) x)
(if (<= t_1 1e+174) t_0 t_2)))))))
double code(double x, double y, double z) {
double t_0 = x * (6.0 * z);
double t_1 = (2.0 / 3.0) - z;
double t_2 = -6.0 * (z * y);
double tmp;
if (t_1 <= -2e+242) {
tmp = y * (z * -6.0);
} else if (t_1 <= -1e+104) {
tmp = t_0;
} else if (t_1 <= -500.0) {
tmp = t_2;
} else if (t_1 <= 1.0) {
tmp = fma(4.0, (y - x), x);
} else if (t_1 <= 1e+174) {
tmp = t_0;
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(x * Float64(6.0 * z)) t_1 = Float64(Float64(2.0 / 3.0) - z) t_2 = Float64(-6.0 * Float64(z * y)) tmp = 0.0 if (t_1 <= -2e+242) tmp = Float64(y * Float64(z * -6.0)); elseif (t_1 <= -1e+104) tmp = t_0; elseif (t_1 <= -500.0) tmp = t_2; elseif (t_1 <= 1.0) tmp = fma(4.0, Float64(y - x), x); elseif (t_1 <= 1e+174) tmp = t_0; else tmp = t_2; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(x * N[(6.0 * z), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]}, Block[{t$95$2 = N[(-6.0 * N[(z * y), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -2e+242], N[(y * N[(z * -6.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, -1e+104], t$95$0, If[LessEqual[t$95$1, -500.0], t$95$2, If[LessEqual[t$95$1, 1.0], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[t$95$1, 1e+174], t$95$0, t$95$2]]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x \cdot \left(6 \cdot z\right)\\
t_1 := \frac{2}{3} - z\\
t_2 := -6 \cdot \left(z \cdot y\right)\\
\mathbf{if}\;t\_1 \leq -2 \cdot 10^{+242}:\\
\;\;\;\;y \cdot \left(z \cdot -6\right)\\
\mathbf{elif}\;t\_1 \leq -1 \cdot 10^{+104}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;t\_1 \leq -500:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;t\_1 \leq 10^{+174}:\\
\;\;\;\;t\_0\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -2.0000000000000001e242Initial program 99.9%
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--.f6499.8
Simplified99.8%
Taylor expanded in x around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6479.6
Simplified79.6%
if -2.0000000000000001e242 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -1e104 or 1 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 1.00000000000000007e174Initial program 99.6%
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--.f6497.5
Simplified97.5%
Taylor expanded in x around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
lower-*.f6462.7
Simplified62.7%
if -1e104 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -500 or 1.00000000000000007e174 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.7%
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--.f6497.3
Simplified97.3%
Taylor expanded in x around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6466.8
Simplified66.8%
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6466.8
Applied egg-rr66.8%
if -500 < (-.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.0
Simplified97.0%
Final simplification80.4%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* x (* 6.0 z))) (t_1 (- (/ 2.0 3.0) z)) (t_2 (* y (* z -6.0))))
(if (<= t_1 -2e+242)
t_2
(if (<= t_1 -1e+104)
t_0
(if (<= t_1 -500.0)
t_2
(if (<= t_1 1.0)
(fma 4.0 (- y x) x)
(if (<= t_1 1e+174) t_0 t_2)))))))
double code(double x, double y, double z) {
double t_0 = x * (6.0 * z);
double t_1 = (2.0 / 3.0) - z;
double t_2 = y * (z * -6.0);
double tmp;
if (t_1 <= -2e+242) {
tmp = t_2;
} else if (t_1 <= -1e+104) {
tmp = t_0;
} else if (t_1 <= -500.0) {
tmp = t_2;
} else if (t_1 <= 1.0) {
tmp = fma(4.0, (y - x), x);
} else if (t_1 <= 1e+174) {
tmp = t_0;
} else {
tmp = t_2;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(x * Float64(6.0 * z)) t_1 = Float64(Float64(2.0 / 3.0) - z) t_2 = Float64(y * Float64(z * -6.0)) tmp = 0.0 if (t_1 <= -2e+242) tmp = t_2; elseif (t_1 <= -1e+104) tmp = t_0; elseif (t_1 <= -500.0) tmp = t_2; elseif (t_1 <= 1.0) tmp = fma(4.0, Float64(y - x), x); elseif (t_1 <= 1e+174) tmp = t_0; else tmp = t_2; end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(x * N[(6.0 * z), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]}, Block[{t$95$2 = N[(y * N[(z * -6.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -2e+242], t$95$2, If[LessEqual[t$95$1, -1e+104], t$95$0, If[LessEqual[t$95$1, -500.0], t$95$2, If[LessEqual[t$95$1, 1.0], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[t$95$1, 1e+174], t$95$0, t$95$2]]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x \cdot \left(6 \cdot z\right)\\
t_1 := \frac{2}{3} - z\\
t_2 := y \cdot \left(z \cdot -6\right)\\
\mathbf{if}\;t\_1 \leq -2 \cdot 10^{+242}:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq -1 \cdot 10^{+104}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;t\_1 \leq -500:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;t\_1 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;t\_1 \leq 10^{+174}:\\
\;\;\;\;t\_0\\
\mathbf{else}:\\
\;\;\;\;t\_2\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -2.0000000000000001e242 or -1e104 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -500 or 1.00000000000000007e174 < (-.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.0
Simplified98.0%
Taylor expanded in x around 0
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6470.6
Simplified70.6%
if -2.0000000000000001e242 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -1e104 or 1 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 1.00000000000000007e174Initial program 99.6%
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--.f6497.5
Simplified97.5%
Taylor expanded in x around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
lower-*.f6462.7
Simplified62.7%
if -500 < (-.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.0
Simplified97.0%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (- (/ 2.0 3.0) z)))
(if (<= t_0 -500.0)
(* 6.0 (* z (- x y)))
(if (<= t_0 1.0) (fma x -3.0 (* y 4.0)) (* z (* 6.0 (- x y)))))))
double code(double x, double y, double z) {
double t_0 = (2.0 / 3.0) - z;
double tmp;
if (t_0 <= -500.0) {
tmp = 6.0 * (z * (x - y));
} else if (t_0 <= 1.0) {
tmp = fma(x, -3.0, (y * 4.0));
} else {
tmp = z * (6.0 * (x - y));
}
return tmp;
}
function code(x, y, z) t_0 = Float64(Float64(2.0 / 3.0) - z) tmp = 0.0 if (t_0 <= -500.0) tmp = Float64(6.0 * Float64(z * Float64(x - y))); elseif (t_0 <= 1.0) tmp = fma(x, -3.0, Float64(y * 4.0)); else tmp = Float64(z * Float64(6.0 * Float64(x - y))); end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(2.0 / 3.0), $MachinePrecision] - z), $MachinePrecision]}, If[LessEqual[t$95$0, -500.0], N[(6.0 * N[(z * N[(x - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 1.0], N[(x * -3.0 + N[(y * 4.0), $MachinePrecision]), $MachinePrecision], N[(z * N[(6.0 * N[(x - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{2}{3} - z\\
\mathbf{if}\;t\_0 \leq -500:\\
\;\;\;\;6 \cdot \left(z \cdot \left(x - y\right)\right)\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(x, -3, y \cdot 4\right)\\
\mathbf{else}:\\
\;\;\;\;z \cdot \left(6 \cdot \left(x - y\right)\right)\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -500Initial 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.1
Simplified98.1%
if -500 < (-.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.0
Simplified97.0%
Taylor expanded in y around 0
associate-+r+N/A
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-fma.f64N/A
*-commutativeN/A
lower-*.f6497.1
Simplified97.1%
if 1 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.6%
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--.f6497.5
Simplified97.5%
lift--.f64N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f64N/A
lower-*.f6497.5
Applied egg-rr97.5%
Final simplification97.5%
(FPCore (x y z) :precision binary64 (let* ((t_0 (- (/ 2.0 3.0) z)) (t_1 (* 6.0 (* z (- x y))))) (if (<= t_0 -500.0) t_1 (if (<= t_0 1.0) (fma x -3.0 (* y 4.0)) 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 <= -500.0) {
tmp = t_1;
} else if (t_0 <= 1.0) {
tmp = fma(x, -3.0, (y * 4.0));
} 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 <= -500.0) tmp = t_1; elseif (t_0 <= 1.0) tmp = fma(x, -3.0, Float64(y * 4.0)); 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, -500.0], t$95$1, If[LessEqual[t$95$0, 1.0], N[(x * -3.0 + N[(y * 4.0), $MachinePrecision]), $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 -500:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{fma}\left(x, -3, y \cdot 4\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -500 or 1 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.7%
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--.f6497.8
Simplified97.8%
if -500 < (-.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.0
Simplified97.0%
Taylor expanded in y around 0
associate-+r+N/A
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-fma.f64N/A
*-commutativeN/A
lower-*.f6497.1
Simplified97.1%
(FPCore (x y z) :precision binary64 (let* ((t_0 (- (/ 2.0 3.0) z)) (t_1 (* x (* 6.0 z)))) (if (<= t_0 -500.0) t_1 (if (<= t_0 1.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 = x * (6.0 * z);
double tmp;
if (t_0 <= -500.0) {
tmp = t_1;
} else if (t_0 <= 1.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(x * Float64(6.0 * z)) tmp = 0.0 if (t_0 <= -500.0) tmp = t_1; elseif (t_0 <= 1.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[(x * N[(6.0 * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -500.0], t$95$1, If[LessEqual[t$95$0, 1.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 := x \cdot \left(6 \cdot z\right)\\
\mathbf{if}\;t\_0 \leq -500:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\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) < -500 or 1 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.7%
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--.f6497.8
Simplified97.8%
Taylor expanded in x around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
lower-*.f6452.1
Simplified52.1%
if -500 < (-.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.0
Simplified97.0%
(FPCore (x y z) :precision binary64 (let* ((t_0 (- (/ 2.0 3.0) z)) (t_1 (* 6.0 (* z x)))) (if (<= t_0 -500.0) t_1 (if (<= t_0 1.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);
double tmp;
if (t_0 <= -500.0) {
tmp = t_1;
} else if (t_0 <= 1.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 * x)) tmp = 0.0 if (t_0 <= -500.0) tmp = t_1; elseif (t_0 <= 1.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 * x), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -500.0], t$95$1, If[LessEqual[t$95$0, 1.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 x\right)\\
\mathbf{if}\;t\_0 \leq -500:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\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) < -500 or 1 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) Initial program 99.7%
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--.f6497.8
Simplified97.8%
Taylor expanded in x around inf
lower-*.f6452.1
Simplified52.1%
if -500 < (-.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.0
Simplified97.0%
Final simplification72.6%
(FPCore (x y z) :precision binary64 (let* ((t_0 (* y (fma z -6.0 4.0)))) (if (<= y -1.05e+57) t_0 (if (<= y 3800.0) (* 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 <= -1.05e+57) {
tmp = t_0;
} else if (y <= 3800.0) {
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 <= -1.05e+57) tmp = t_0; elseif (y <= 3800.0) 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, -1.05e+57], t$95$0, If[LessEqual[y, 3800.0], 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 -1.05 \cdot 10^{+57}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;y \leq 3800:\\
\;\;\;\;x \cdot \mathsf{fma}\left(6, z, -3\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if y < -1.04999999999999995e57 or 3800 < 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.f6487.4
Simplified87.4%
if -1.04999999999999995e57 < y < 3800Initial program 99.4%
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
Simplified74.7%
(FPCore (x y z) :precision binary64 (if (<= y -9.5e+17) (* y 4.0) (if (<= y 23000000.0) (* x -3.0) (* y 4.0))))
double code(double x, double y, double z) {
double tmp;
if (y <= -9.5e+17) {
tmp = y * 4.0;
} else if (y <= 23000000.0) {
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 <= (-9.5d+17)) then
tmp = y * 4.0d0
else if (y <= 23000000.0d0) 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 <= -9.5e+17) {
tmp = y * 4.0;
} else if (y <= 23000000.0) {
tmp = x * -3.0;
} else {
tmp = y * 4.0;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= -9.5e+17: tmp = y * 4.0 elif y <= 23000000.0: tmp = x * -3.0 else: tmp = y * 4.0 return tmp
function code(x, y, z) tmp = 0.0 if (y <= -9.5e+17) tmp = Float64(y * 4.0); elseif (y <= 23000000.0) 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 <= -9.5e+17) tmp = y * 4.0; elseif (y <= 23000000.0) tmp = x * -3.0; else tmp = y * 4.0; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, -9.5e+17], N[(y * 4.0), $MachinePrecision], If[LessEqual[y, 23000000.0], N[(x * -3.0), $MachinePrecision], N[(y * 4.0), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq -9.5 \cdot 10^{+17}:\\
\;\;\;\;y \cdot 4\\
\mathbf{elif}\;y \leq 23000000:\\
\;\;\;\;x \cdot -3\\
\mathbf{else}:\\
\;\;\;\;y \cdot 4\\
\end{array}
\end{array}
if y < -9.5e17 or 2.3e7 < y Initial program 99.6%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6445.8
Simplified45.8%
Taylor expanded in y around inf
*-commutativeN/A
lower-*.f6438.1
Simplified38.1%
if -9.5e17 < y < 2.3e7Initial program 99.4%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6446.9
Simplified46.9%
Taylor expanded in y around 0
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f6438.1
Simplified38.1%
(FPCore (x y z) :precision binary64 (fma 4.0 (- y x) x))
double code(double x, double y, double z) {
return fma(4.0, (y - x), x);
}
function code(x, y, z) return fma(4.0, Float64(y - x), x) end
code[x_, y_, z_] := N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(4, y - x, x\right)
\end{array}
Initial program 99.5%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6446.4
Simplified46.4%
(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.5%
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-*.f6425.8
Simplified25.8%
herbie shell --seed 2024207
(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))))