
(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 16 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 (- y x) 4.0 (fma (- y x) (* -6.0 z) x)))
double code(double x, double y, double z) {
return fma((y - x), 4.0, fma((y - x), (-6.0 * z), x));
}
function code(x, y, z) return fma(Float64(y - x), 4.0, fma(Float64(y - x), Float64(-6.0 * z), x)) end
code[x_, y_, z_] := N[(N[(y - x), $MachinePrecision] * 4.0 + N[(N[(y - x), $MachinePrecision] * N[(-6.0 * z), $MachinePrecision] + x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(y - x, 4, \mathsf{fma}\left(y - x, -6 \cdot z, x\right)\right)
\end{array}
Initial program 99.6%
lift--.f64N/A
lift-/.f64N/A
lift--.f64N/A
lift-*.f64N/A
lift-*.f64N/A
+-commutativeN/A
lift-*.f64N/A
lift--.f64N/A
sub-negN/A
distribute-lft-inN/A
associate-+l+N/A
lift-*.f64N/A
associate-*l*N/A
lower-fma.f64N/A
lift-/.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites99.8%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (- (/ 2.0 3.0) z)) (t_1 (* z (* (- y x) -6.0))))
(if (<= t_0 -50.0)
t_1
(if (<= t_0 0.666667)
(fma -3.0 x (* y 4.0))
(if (<= t_0 500000000.0) (* y (fma z -6.0 4.0)) t_1)))))
double code(double x, double y, double z) {
double t_0 = (2.0 / 3.0) - z;
double t_1 = z * ((y - x) * -6.0);
double tmp;
if (t_0 <= -50.0) {
tmp = t_1;
} else if (t_0 <= 0.666667) {
tmp = fma(-3.0, x, (y * 4.0));
} else if (t_0 <= 500000000.0) {
tmp = y * fma(z, -6.0, 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(z * Float64(Float64(y - x) * -6.0)) tmp = 0.0 if (t_0 <= -50.0) tmp = t_1; elseif (t_0 <= 0.666667) tmp = fma(-3.0, x, Float64(y * 4.0)); elseif (t_0 <= 500000000.0) tmp = Float64(y * fma(z, -6.0, 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[(z * N[(N[(y - x), $MachinePrecision] * -6.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -50.0], t$95$1, If[LessEqual[t$95$0, 0.666667], N[(-3.0 * x + N[(y * 4.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 500000000.0], N[(y * N[(z * -6.0 + 4.0), $MachinePrecision]), $MachinePrecision], t$95$1]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{2}{3} - z\\
t_1 := z \cdot \left(\left(y - x\right) \cdot -6\right)\\
\mathbf{if}\;t\_0 \leq -50:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 0.666667:\\
\;\;\;\;\mathsf{fma}\left(-3, x, y \cdot 4\right)\\
\mathbf{elif}\;t\_0 \leq 500000000:\\
\;\;\;\;y \cdot \mathsf{fma}\left(z, -6, 4\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -50 or 5e8 < (-.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
lift-*.f64N/A
+-commutativeN/A
lift-*.f64N/A
lift--.f64N/A
sub-negN/A
distribute-lft-inN/A
associate-+l+N/A
lift-*.f64N/A
associate-*l*N/A
lower-fma.f64N/A
lift-/.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites99.8%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f64N/A
lower-*.f64N/A
lower--.f6499.0
Applied rewrites99.0%
if -50 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 0.66666700000000001Initial program 99.3%
lift--.f64N/A
lift-/.f64N/A
lift--.f64N/A
lift-*.f64N/A
lift-*.f64N/A
+-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lower-fma.f6499.2
lift-/.f64N/A
metadata-eval99.2
Applied rewrites99.2%
Taylor expanded in z around 0
Applied rewrites98.1%
lift--.f64N/A
*-commutativeN/A
lift--.f64N/A
sub-negN/A
+-commutativeN/A
distribute-lft-inN/A
neg-mul-1N/A
associate-*r*N/A
metadata-evalN/A
lower-fma.f64N/A
lower-*.f6498.2
Applied rewrites98.2%
lift-*.f64N/A
lift-fma.f64N/A
+-commutativeN/A
lift-fma.f64N/A
distribute-lft-inN/A
associate-+r+N/A
associate-*r*N/A
metadata-evalN/A
distribute-rgt1-inN/A
lower-fma.f64N/A
metadata-evalN/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
associate-*l*N/A
metadata-evalN/A
metadata-evalN/A
lower-*.f64N/A
metadata-eval98.8
Applied rewrites98.8%
if 0.66666700000000001 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 5e8Initial program 99.3%
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.f6488.3
Applied rewrites88.3%
Final simplification98.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 -50.0)
t_1
(if (<= t_0 0.666667)
(fma -3.0 x (* y 4.0))
(if (<= t_0 500000000.0) (* y (fma z -6.0 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 <= -50.0) {
tmp = t_1;
} else if (t_0 <= 0.666667) {
tmp = fma(-3.0, x, (y * 4.0));
} else if (t_0 <= 500000000.0) {
tmp = y * fma(z, -6.0, 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 <= -50.0) tmp = t_1; elseif (t_0 <= 0.666667) tmp = fma(-3.0, x, Float64(y * 4.0)); elseif (t_0 <= 500000000.0) tmp = Float64(y * fma(z, -6.0, 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, -50.0], t$95$1, If[LessEqual[t$95$0, 0.666667], N[(-3.0 * x + N[(y * 4.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 500000000.0], N[(y * N[(z * -6.0 + 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 -50:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;t\_0 \leq 0.666667:\\
\;\;\;\;\mathsf{fma}\left(-3, x, y \cdot 4\right)\\
\mathbf{elif}\;t\_0 \leq 500000000:\\
\;\;\;\;y \cdot \mathsf{fma}\left(z, -6, 4\right)\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < -50 or 5e8 < (-.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.9
Applied rewrites98.9%
if -50 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 0.66666700000000001Initial program 99.3%
lift--.f64N/A
lift-/.f64N/A
lift--.f64N/A
lift-*.f64N/A
lift-*.f64N/A
+-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lower-fma.f6499.2
lift-/.f64N/A
metadata-eval99.2
Applied rewrites99.2%
Taylor expanded in z around 0
Applied rewrites98.1%
lift--.f64N/A
*-commutativeN/A
lift--.f64N/A
sub-negN/A
+-commutativeN/A
distribute-lft-inN/A
neg-mul-1N/A
associate-*r*N/A
metadata-evalN/A
lower-fma.f64N/A
lower-*.f6498.2
Applied rewrites98.2%
lift-*.f64N/A
lift-fma.f64N/A
+-commutativeN/A
lift-fma.f64N/A
distribute-lft-inN/A
associate-+r+N/A
associate-*r*N/A
metadata-evalN/A
distribute-rgt1-inN/A
lower-fma.f64N/A
metadata-evalN/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
associate-*l*N/A
metadata-evalN/A
metadata-evalN/A
lower-*.f64N/A
metadata-eval98.8
Applied rewrites98.8%
if 0.66666700000000001 < (-.f64 (/.f64 #s(literal 2 binary64) #s(literal 3 binary64)) z) < 5e8Initial program 99.3%
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.f6488.3
Applied rewrites88.3%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* y (fma z -6.0 4.0))))
(if (<= z -7.2e+35)
(* x (* z 6.0))
(if (<= z -1.15e-7)
t_0
(if (<= z 1.6e-10)
(fma -3.0 x (* y 4.0))
(if (<= z 1.85e+134)
t_0
(if (<= z 5.1e+290) (* 6.0 (* x z)) (* -6.0 (* y z)))))))))
double code(double x, double y, double z) {
double t_0 = y * fma(z, -6.0, 4.0);
double tmp;
if (z <= -7.2e+35) {
tmp = x * (z * 6.0);
} else if (z <= -1.15e-7) {
tmp = t_0;
} else if (z <= 1.6e-10) {
tmp = fma(-3.0, x, (y * 4.0));
} else if (z <= 1.85e+134) {
tmp = t_0;
} else if (z <= 5.1e+290) {
tmp = 6.0 * (x * z);
} else {
tmp = -6.0 * (y * z);
}
return tmp;
}
function code(x, y, z) t_0 = Float64(y * fma(z, -6.0, 4.0)) tmp = 0.0 if (z <= -7.2e+35) tmp = Float64(x * Float64(z * 6.0)); elseif (z <= -1.15e-7) tmp = t_0; elseif (z <= 1.6e-10) tmp = fma(-3.0, x, Float64(y * 4.0)); elseif (z <= 1.85e+134) tmp = t_0; elseif (z <= 5.1e+290) tmp = Float64(6.0 * Float64(x * z)); else tmp = Float64(-6.0 * Float64(y * z)); end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(y * N[(z * -6.0 + 4.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -7.2e+35], N[(x * N[(z * 6.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, -1.15e-7], t$95$0, If[LessEqual[z, 1.6e-10], N[(-3.0 * x + N[(y * 4.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 1.85e+134], t$95$0, If[LessEqual[z, 5.1e+290], N[(6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision], N[(-6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \mathsf{fma}\left(z, -6, 4\right)\\
\mathbf{if}\;z \leq -7.2 \cdot 10^{+35}:\\
\;\;\;\;x \cdot \left(z \cdot 6\right)\\
\mathbf{elif}\;z \leq -1.15 \cdot 10^{-7}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 1.6 \cdot 10^{-10}:\\
\;\;\;\;\mathsf{fma}\left(-3, x, y \cdot 4\right)\\
\mathbf{elif}\;z \leq 1.85 \cdot 10^{+134}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 5.1 \cdot 10^{+290}:\\
\;\;\;\;6 \cdot \left(x \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;-6 \cdot \left(y \cdot z\right)\\
\end{array}
\end{array}
if z < -7.2000000000000001e35Initial 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.f6461.4
Applied rewrites61.4%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6461.3
Applied rewrites61.3%
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lift-*.f64N/A
lower-*.f6461.4
lift-*.f64N/A
*-commutativeN/A
lower-*.f6461.4
Applied rewrites61.4%
if -7.2000000000000001e35 < z < -1.14999999999999997e-7 or 1.5999999999999999e-10 < z < 1.85000000000000007e134Initial program 99.6%
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.f6467.4
Applied rewrites67.4%
if -1.14999999999999997e-7 < z < 1.5999999999999999e-10Initial program 99.3%
lift--.f64N/A
lift-/.f64N/A
lift--.f64N/A
lift-*.f64N/A
lift-*.f64N/A
+-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
lower-fma.f6499.2
lift-/.f64N/A
metadata-eval99.2
Applied rewrites99.2%
Taylor expanded in z around 0
Applied rewrites99.0%
lift--.f64N/A
*-commutativeN/A
lift--.f64N/A
sub-negN/A
+-commutativeN/A
distribute-lft-inN/A
neg-mul-1N/A
associate-*r*N/A
metadata-evalN/A
lower-fma.f64N/A
lower-*.f6499.1
Applied rewrites99.1%
lift-*.f64N/A
lift-fma.f64N/A
+-commutativeN/A
lift-fma.f64N/A
distribute-lft-inN/A
associate-+r+N/A
associate-*r*N/A
metadata-evalN/A
distribute-rgt1-inN/A
lower-fma.f64N/A
metadata-evalN/A
*-commutativeN/A
lift-*.f64N/A
*-commutativeN/A
associate-*l*N/A
metadata-evalN/A
metadata-evalN/A
lower-*.f64N/A
metadata-eval99.7
Applied rewrites99.7%
if 1.85000000000000007e134 < z < 5.10000000000000023e290Initial program 99.9%
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.8
Applied rewrites65.8%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6465.9
Applied rewrites65.9%
associate-*r*N/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6465.9
Applied rewrites65.9%
if 5.10000000000000023e290 < 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.f6499.7
Applied rewrites99.7%
Taylor expanded in z around inf
lower-*.f64N/A
*-commutativeN/A
lower-*.f6499.8
Applied rewrites99.8%
Final simplification81.3%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* y (fma z -6.0 4.0))))
(if (<= z -7.2e+35)
(* x (* z 6.0))
(if (<= z -1.15e-7)
t_0
(if (<= z 1.6e-10)
(fma 4.0 (- y x) x)
(if (<= z 1.85e+134)
t_0
(if (<= z 5.1e+290) (* 6.0 (* x z)) (* -6.0 (* y z)))))))))
double code(double x, double y, double z) {
double t_0 = y * fma(z, -6.0, 4.0);
double tmp;
if (z <= -7.2e+35) {
tmp = x * (z * 6.0);
} else if (z <= -1.15e-7) {
tmp = t_0;
} else if (z <= 1.6e-10) {
tmp = fma(4.0, (y - x), x);
} else if (z <= 1.85e+134) {
tmp = t_0;
} else if (z <= 5.1e+290) {
tmp = 6.0 * (x * z);
} else {
tmp = -6.0 * (y * z);
}
return tmp;
}
function code(x, y, z) t_0 = Float64(y * fma(z, -6.0, 4.0)) tmp = 0.0 if (z <= -7.2e+35) tmp = Float64(x * Float64(z * 6.0)); elseif (z <= -1.15e-7) tmp = t_0; elseif (z <= 1.6e-10) tmp = fma(4.0, Float64(y - x), x); elseif (z <= 1.85e+134) tmp = t_0; elseif (z <= 5.1e+290) tmp = Float64(6.0 * Float64(x * z)); else tmp = Float64(-6.0 * Float64(y * z)); end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(y * N[(z * -6.0 + 4.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -7.2e+35], N[(x * N[(z * 6.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, -1.15e-7], t$95$0, If[LessEqual[z, 1.6e-10], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[z, 1.85e+134], t$95$0, If[LessEqual[z, 5.1e+290], N[(6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision], N[(-6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \mathsf{fma}\left(z, -6, 4\right)\\
\mathbf{if}\;z \leq -7.2 \cdot 10^{+35}:\\
\;\;\;\;x \cdot \left(z \cdot 6\right)\\
\mathbf{elif}\;z \leq -1.15 \cdot 10^{-7}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 1.6 \cdot 10^{-10}:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;z \leq 1.85 \cdot 10^{+134}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 5.1 \cdot 10^{+290}:\\
\;\;\;\;6 \cdot \left(x \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;-6 \cdot \left(y \cdot z\right)\\
\end{array}
\end{array}
if z < -7.2000000000000001e35Initial 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.f6461.4
Applied rewrites61.4%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6461.3
Applied rewrites61.3%
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lift-*.f64N/A
lower-*.f6461.4
lift-*.f64N/A
*-commutativeN/A
lower-*.f6461.4
Applied rewrites61.4%
if -7.2000000000000001e35 < z < -1.14999999999999997e-7 or 1.5999999999999999e-10 < z < 1.85000000000000007e134Initial program 99.6%
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.f6467.4
Applied rewrites67.4%
if -1.14999999999999997e-7 < z < 1.5999999999999999e-10Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6499.6
Applied rewrites99.6%
if 1.85000000000000007e134 < z < 5.10000000000000023e290Initial program 99.9%
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.8
Applied rewrites65.8%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6465.9
Applied rewrites65.9%
associate-*r*N/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6465.9
Applied rewrites65.9%
if 5.10000000000000023e290 < 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.f6499.7
Applied rewrites99.7%
Taylor expanded in z around inf
lower-*.f64N/A
*-commutativeN/A
lower-*.f6499.8
Applied rewrites99.8%
Final simplification81.3%
(FPCore (x y z)
:precision binary64
(if (<= z -0.0014)
(* x (fma 6.0 z -3.0))
(if (<= z 0.68)
(fma 4.0 (- y x) x)
(if (<= z 1.85e+134)
(* y (* -6.0 z))
(if (<= z 5.1e+290) (* 6.0 (* x z)) (* -6.0 (* y z)))))))
double code(double x, double y, double z) {
double tmp;
if (z <= -0.0014) {
tmp = x * fma(6.0, z, -3.0);
} else if (z <= 0.68) {
tmp = fma(4.0, (y - x), x);
} else if (z <= 1.85e+134) {
tmp = y * (-6.0 * z);
} else if (z <= 5.1e+290) {
tmp = 6.0 * (x * z);
} else {
tmp = -6.0 * (y * z);
}
return tmp;
}
function code(x, y, z) tmp = 0.0 if (z <= -0.0014) tmp = Float64(x * fma(6.0, z, -3.0)); elseif (z <= 0.68) tmp = fma(4.0, Float64(y - x), x); elseif (z <= 1.85e+134) tmp = Float64(y * Float64(-6.0 * z)); elseif (z <= 5.1e+290) tmp = Float64(6.0 * Float64(x * z)); else tmp = Float64(-6.0 * Float64(y * z)); end return tmp end
code[x_, y_, z_] := If[LessEqual[z, -0.0014], N[(x * N[(6.0 * z + -3.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 0.68], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[z, 1.85e+134], N[(y * N[(-6.0 * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 5.1e+290], N[(6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision], N[(-6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -0.0014:\\
\;\;\;\;x \cdot \mathsf{fma}\left(6, z, -3\right)\\
\mathbf{elif}\;z \leq 0.68:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;z \leq 1.85 \cdot 10^{+134}:\\
\;\;\;\;y \cdot \left(-6 \cdot z\right)\\
\mathbf{elif}\;z \leq 5.1 \cdot 10^{+290}:\\
\;\;\;\;6 \cdot \left(x \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;-6 \cdot \left(y \cdot z\right)\\
\end{array}
\end{array}
if z < -0.00139999999999999999Initial 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
*-commutativeN/A
associate-*l*N/A
neg-mul-1N/A
lower-*.f64N/A
sub-negN/A
metadata-evalN/A
distribute-neg-inN/A
distribute-lft-neg-inN/A
metadata-evalN/A
Applied rewrites56.2%
if -0.00139999999999999999 < z < 0.680000000000000049Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6496.2
Applied rewrites96.2%
if 0.680000000000000049 < z < 1.85000000000000007e134Initial 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.f6466.6
Applied rewrites66.6%
Taylor expanded in z around inf
lower-*.f6463.4
Applied rewrites63.4%
if 1.85000000000000007e134 < z < 5.10000000000000023e290Initial program 99.9%
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.8
Applied rewrites65.8%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6465.9
Applied rewrites65.9%
associate-*r*N/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6465.9
Applied rewrites65.9%
if 5.10000000000000023e290 < 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.f6499.7
Applied rewrites99.7%
Taylor expanded in z around inf
lower-*.f64N/A
*-commutativeN/A
lower-*.f6499.8
Applied rewrites99.8%
Final simplification78.7%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* 6.0 (* x z))))
(if (<= z -490000000.0)
t_0
(if (<= z 0.68)
(fma 4.0 (- y x) x)
(if (<= z 1.85e+134)
(* y (* -6.0 z))
(if (<= z 5.1e+290) t_0 (* -6.0 (* y z))))))))
double code(double x, double y, double z) {
double t_0 = 6.0 * (x * z);
double tmp;
if (z <= -490000000.0) {
tmp = t_0;
} else if (z <= 0.68) {
tmp = fma(4.0, (y - x), x);
} else if (z <= 1.85e+134) {
tmp = y * (-6.0 * z);
} else if (z <= 5.1e+290) {
tmp = t_0;
} else {
tmp = -6.0 * (y * z);
}
return tmp;
}
function code(x, y, z) t_0 = Float64(6.0 * Float64(x * z)) tmp = 0.0 if (z <= -490000000.0) tmp = t_0; elseif (z <= 0.68) tmp = fma(4.0, Float64(y - x), x); elseif (z <= 1.85e+134) tmp = Float64(y * Float64(-6.0 * z)); elseif (z <= 5.1e+290) tmp = t_0; else tmp = Float64(-6.0 * Float64(y * z)); end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -490000000.0], t$95$0, If[LessEqual[z, 0.68], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[z, 1.85e+134], N[(y * N[(-6.0 * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 5.1e+290], t$95$0, N[(-6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 6 \cdot \left(x \cdot z\right)\\
\mathbf{if}\;z \leq -490000000:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 0.68:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;z \leq 1.85 \cdot 10^{+134}:\\
\;\;\;\;y \cdot \left(-6 \cdot z\right)\\
\mathbf{elif}\;z \leq 5.1 \cdot 10^{+290}:\\
\;\;\;\;t\_0\\
\mathbf{else}:\\
\;\;\;\;-6 \cdot \left(y \cdot z\right)\\
\end{array}
\end{array}
if z < -4.9e8 or 1.85000000000000007e134 < z < 5.10000000000000023e290Initial 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.f6461.4
Applied rewrites61.4%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6461.4
Applied rewrites61.4%
associate-*r*N/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6461.4
Applied rewrites61.4%
if -4.9e8 < z < 0.680000000000000049Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6493.5
Applied rewrites93.5%
if 0.680000000000000049 < z < 1.85000000000000007e134Initial 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.f6466.6
Applied rewrites66.6%
Taylor expanded in z around inf
lower-*.f6463.4
Applied rewrites63.4%
if 5.10000000000000023e290 < 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.f6499.7
Applied rewrites99.7%
Taylor expanded in z around inf
lower-*.f64N/A
*-commutativeN/A
lower-*.f6499.8
Applied rewrites99.8%
Final simplification78.4%
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* z (* x 6.0))))
(if (<= z -490000000.0)
t_0
(if (<= z 0.68)
(fma 4.0 (- y x) x)
(if (<= z 1.85e+134)
(* y (* -6.0 z))
(if (<= z 5.1e+290) t_0 (* -6.0 (* y z))))))))
double code(double x, double y, double z) {
double t_0 = z * (x * 6.0);
double tmp;
if (z <= -490000000.0) {
tmp = t_0;
} else if (z <= 0.68) {
tmp = fma(4.0, (y - x), x);
} else if (z <= 1.85e+134) {
tmp = y * (-6.0 * z);
} else if (z <= 5.1e+290) {
tmp = t_0;
} else {
tmp = -6.0 * (y * z);
}
return tmp;
}
function code(x, y, z) t_0 = Float64(z * Float64(x * 6.0)) tmp = 0.0 if (z <= -490000000.0) tmp = t_0; elseif (z <= 0.68) tmp = fma(4.0, Float64(y - x), x); elseif (z <= 1.85e+134) tmp = Float64(y * Float64(-6.0 * z)); elseif (z <= 5.1e+290) tmp = t_0; else tmp = Float64(-6.0 * Float64(y * z)); end return tmp end
code[x_, y_, z_] := Block[{t$95$0 = N[(z * N[(x * 6.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -490000000.0], t$95$0, If[LessEqual[z, 0.68], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], If[LessEqual[z, 1.85e+134], N[(y * N[(-6.0 * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 5.1e+290], t$95$0, N[(-6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := z \cdot \left(x \cdot 6\right)\\
\mathbf{if}\;z \leq -490000000:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 0.68:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{elif}\;z \leq 1.85 \cdot 10^{+134}:\\
\;\;\;\;y \cdot \left(-6 \cdot z\right)\\
\mathbf{elif}\;z \leq 5.1 \cdot 10^{+290}:\\
\;\;\;\;t\_0\\
\mathbf{else}:\\
\;\;\;\;-6 \cdot \left(y \cdot z\right)\\
\end{array}
\end{array}
if z < -4.9e8 or 1.85000000000000007e134 < z < 5.10000000000000023e290Initial 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.f6461.4
Applied rewrites61.4%
Taylor expanded in z around inf
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6461.4
Applied rewrites61.4%
if -4.9e8 < z < 0.680000000000000049Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6493.5
Applied rewrites93.5%
if 0.680000000000000049 < z < 1.85000000000000007e134Initial 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.f6466.6
Applied rewrites66.6%
Taylor expanded in z around inf
lower-*.f6463.4
Applied rewrites63.4%
if 5.10000000000000023e290 < 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.f6499.7
Applied rewrites99.7%
Taylor expanded in z around inf
lower-*.f64N/A
*-commutativeN/A
lower-*.f6499.8
Applied rewrites99.8%
Final simplification78.4%
(FPCore (x y z) :precision binary64 (let* ((t_0 (* y (* -6.0 z)))) (if (<= z -28.5) t_0 (if (<= z 0.68) (fma 4.0 (- y x) x) t_0))))
double code(double x, double y, double z) {
double t_0 = y * (-6.0 * z);
double tmp;
if (z <= -28.5) {
tmp = t_0;
} else if (z <= 0.68) {
tmp = fma(4.0, (y - x), x);
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(y * Float64(-6.0 * z)) tmp = 0.0 if (z <= -28.5) tmp = t_0; elseif (z <= 0.68) 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[(y * N[(-6.0 * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -28.5], t$95$0, If[LessEqual[z, 0.68], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], t$95$0]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := y \cdot \left(-6 \cdot z\right)\\
\mathbf{if}\;z \leq -28.5:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 0.68:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if z < -28.5 or 0.680000000000000049 < 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.f6453.1
Applied rewrites53.1%
Taylor expanded in z around inf
lower-*.f6451.2
Applied rewrites51.2%
if -28.5 < z < 0.680000000000000049Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6495.5
Applied rewrites95.5%
(FPCore (x y z) :precision binary64 (let* ((t_0 (* -6.0 (* y z)))) (if (<= z -28.5) t_0 (if (<= z 0.68) (fma 4.0 (- y x) x) t_0))))
double code(double x, double y, double z) {
double t_0 = -6.0 * (y * z);
double tmp;
if (z <= -28.5) {
tmp = t_0;
} else if (z <= 0.68) {
tmp = fma(4.0, (y - x), x);
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y, z) t_0 = Float64(-6.0 * Float64(y * z)) tmp = 0.0 if (z <= -28.5) tmp = t_0; elseif (z <= 0.68) 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[(y * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -28.5], t$95$0, If[LessEqual[z, 0.68], N[(4.0 * N[(y - x), $MachinePrecision] + x), $MachinePrecision], t$95$0]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := -6 \cdot \left(y \cdot z\right)\\
\mathbf{if}\;z \leq -28.5:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;z \leq 0.68:\\
\;\;\;\;\mathsf{fma}\left(4, y - x, x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if z < -28.5 or 0.680000000000000049 < 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.f6453.1
Applied rewrites53.1%
Taylor expanded in z around inf
lower-*.f64N/A
*-commutativeN/A
lower-*.f6451.1
Applied rewrites51.1%
if -28.5 < z < 0.680000000000000049Initial program 99.3%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6495.5
Applied rewrites95.5%
Final simplification71.9%
(FPCore (x y z) :precision binary64 (let* ((t_0 (* (- y x) 4.0))) (if (<= y -2.65e-120) t_0 (if (<= y 2.65e-34) (* x -3.0) t_0))))
double code(double x, double y, double z) {
double t_0 = (y - x) * 4.0;
double tmp;
if (y <= -2.65e-120) {
tmp = t_0;
} else if (y <= 2.65e-34) {
tmp = x * -3.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 = (y - x) * 4.0d0
if (y <= (-2.65d-120)) then
tmp = t_0
else if (y <= 2.65d-34) then
tmp = x * (-3.0d0)
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = (y - x) * 4.0;
double tmp;
if (y <= -2.65e-120) {
tmp = t_0;
} else if (y <= 2.65e-34) {
tmp = x * -3.0;
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = (y - x) * 4.0 tmp = 0 if y <= -2.65e-120: tmp = t_0 elif y <= 2.65e-34: tmp = x * -3.0 else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(Float64(y - x) * 4.0) tmp = 0.0 if (y <= -2.65e-120) tmp = t_0; elseif (y <= 2.65e-34) tmp = Float64(x * -3.0); else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = (y - x) * 4.0; tmp = 0.0; if (y <= -2.65e-120) tmp = t_0; elseif (y <= 2.65e-34) tmp = x * -3.0; else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(N[(y - x), $MachinePrecision] * 4.0), $MachinePrecision]}, If[LessEqual[y, -2.65e-120], t$95$0, If[LessEqual[y, 2.65e-34], N[(x * -3.0), $MachinePrecision], t$95$0]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(y - x\right) \cdot 4\\
\mathbf{if}\;y \leq -2.65 \cdot 10^{-120}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;y \leq 2.65 \cdot 10^{-34}:\\
\;\;\;\;x \cdot -3\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if y < -2.64999999999999999e-120 or 2.6499999999999998e-34 < y Initial program 99.6%
lift--.f64N/A
lift-/.f64N/A
lift--.f64N/A
lift-*.f64N/A
lift-*.f64N/A
+-commutativeN/A
lift-*.f64N/A
lift--.f64N/A
sub-negN/A
distribute-lft-inN/A
associate-+l+N/A
lift-*.f64N/A
associate-*l*N/A
lower-fma.f64N/A
lift-/.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites99.9%
Taylor expanded in y around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6473.6
Applied rewrites73.6%
Taylor expanded in z around 0
lower-*.f64N/A
lower--.f6436.0
Applied rewrites36.0%
if -2.64999999999999999e-120 < y < 2.6499999999999998e-34Initial program 99.5%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6446.0
Applied rewrites46.0%
Taylor expanded in y around 0
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f6440.6
Applied rewrites40.6%
Final simplification37.7%
(FPCore (x y z) :precision binary64 (if (<= y -7.2e+114) (* y 4.0) (if (<= y 2.45e-32) (* x -3.0) (* y 4.0))))
double code(double x, double y, double z) {
double tmp;
if (y <= -7.2e+114) {
tmp = y * 4.0;
} else if (y <= 2.45e-32) {
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 <= (-7.2d+114)) then
tmp = y * 4.0d0
else if (y <= 2.45d-32) 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 <= -7.2e+114) {
tmp = y * 4.0;
} else if (y <= 2.45e-32) {
tmp = x * -3.0;
} else {
tmp = y * 4.0;
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= -7.2e+114: tmp = y * 4.0 elif y <= 2.45e-32: tmp = x * -3.0 else: tmp = y * 4.0 return tmp
function code(x, y, z) tmp = 0.0 if (y <= -7.2e+114) tmp = Float64(y * 4.0); elseif (y <= 2.45e-32) 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 <= -7.2e+114) tmp = y * 4.0; elseif (y <= 2.45e-32) tmp = x * -3.0; else tmp = y * 4.0; end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, -7.2e+114], N[(y * 4.0), $MachinePrecision], If[LessEqual[y, 2.45e-32], N[(x * -3.0), $MachinePrecision], N[(y * 4.0), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq -7.2 \cdot 10^{+114}:\\
\;\;\;\;y \cdot 4\\
\mathbf{elif}\;y \leq 2.45 \cdot 10^{-32}:\\
\;\;\;\;x \cdot -3\\
\mathbf{else}:\\
\;\;\;\;y \cdot 4\\
\end{array}
\end{array}
if y < -7.2000000000000001e114 or 2.4499999999999999e-32 < y Initial program 99.7%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6447.9
Applied rewrites47.9%
Taylor expanded in y around inf
*-commutativeN/A
lower-*.f6438.4
Applied rewrites38.4%
if -7.2000000000000001e114 < y < 2.4499999999999999e-32Initial program 99.5%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6445.3
Applied rewrites45.3%
Taylor expanded in y around 0
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f6435.5
Applied rewrites35.5%
(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
Applied rewrites99.7%
(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.6%
Taylor expanded in z around 0
+-commutativeN/A
lower-fma.f64N/A
lower--.f6446.5
Applied rewrites46.5%
(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--.f6446.5
Applied rewrites46.5%
Taylor expanded in y around 0
distribute-rgt1-inN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f6424.5
Applied rewrites24.5%
(FPCore (x y z) :precision binary64 (* x -4.0))
double code(double x, double y, double z) {
return x * -4.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 * (-4.0d0)
end function
public static double code(double x, double y, double z) {
return x * -4.0;
}
def code(x, y, z): return x * -4.0
function code(x, y, z) return Float64(x * -4.0) end
function tmp = code(x, y, z) tmp = x * -4.0; end
code[x_, y_, z_] := N[(x * -4.0), $MachinePrecision]
\begin{array}{l}
\\
x \cdot -4
\end{array}
Initial program 99.6%
lift--.f64N/A
lift-/.f64N/A
lift--.f64N/A
lift-*.f64N/A
lift-*.f64N/A
+-commutativeN/A
lift-*.f64N/A
lift--.f64N/A
sub-negN/A
distribute-lft-inN/A
associate-+l+N/A
lift-*.f64N/A
associate-*l*N/A
lower-fma.f64N/A
lift-/.f64N/A
metadata-evalN/A
metadata-evalN/A
Applied rewrites99.8%
Taylor expanded in y around inf
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f6456.2
Applied rewrites56.2%
Taylor expanded in y around 0
*-commutativeN/A
lower-*.f647.2
Applied rewrites7.2%
herbie shell --seed 2024216
(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))))