
(FPCore (x y) :precision binary64 (* (* 3.0 (sqrt x)) (- (+ y (/ 1.0 (* x 9.0))) 1.0)))
double code(double x, double y) {
return (3.0 * sqrt(x)) * ((y + (1.0 / (x * 9.0))) - 1.0);
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = (3.0d0 * sqrt(x)) * ((y + (1.0d0 / (x * 9.0d0))) - 1.0d0)
end function
public static double code(double x, double y) {
return (3.0 * Math.sqrt(x)) * ((y + (1.0 / (x * 9.0))) - 1.0);
}
def code(x, y): return (3.0 * math.sqrt(x)) * ((y + (1.0 / (x * 9.0))) - 1.0)
function code(x, y) return Float64(Float64(3.0 * sqrt(x)) * Float64(Float64(y + Float64(1.0 / Float64(x * 9.0))) - 1.0)) end
function tmp = code(x, y) tmp = (3.0 * sqrt(x)) * ((y + (1.0 / (x * 9.0))) - 1.0); end
code[x_, y_] := N[(N[(3.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision] * N[(N[(y + N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(3 \cdot \sqrt{x}\right) \cdot \left(\left(y + \frac{1}{x \cdot 9}\right) - 1\right)
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 11 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y) :precision binary64 (* (* 3.0 (sqrt x)) (- (+ y (/ 1.0 (* x 9.0))) 1.0)))
double code(double x, double y) {
return (3.0 * sqrt(x)) * ((y + (1.0 / (x * 9.0))) - 1.0);
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = (3.0d0 * sqrt(x)) * ((y + (1.0d0 / (x * 9.0d0))) - 1.0d0)
end function
public static double code(double x, double y) {
return (3.0 * Math.sqrt(x)) * ((y + (1.0 / (x * 9.0))) - 1.0);
}
def code(x, y): return (3.0 * math.sqrt(x)) * ((y + (1.0 / (x * 9.0))) - 1.0)
function code(x, y) return Float64(Float64(3.0 * sqrt(x)) * Float64(Float64(y + Float64(1.0 / Float64(x * 9.0))) - 1.0)) end
function tmp = code(x, y) tmp = (3.0 * sqrt(x)) * ((y + (1.0 / (x * 9.0))) - 1.0); end
code[x_, y_] := N[(N[(3.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision] * N[(N[(y + N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(3 \cdot \sqrt{x}\right) \cdot \left(\left(y + \frac{1}{x \cdot 9}\right) - 1\right)
\end{array}
(FPCore (x y) :precision binary64 (* (sqrt x) (fma 3.0 (+ y -1.0) (/ 0.3333333333333333 x))))
double code(double x, double y) {
return sqrt(x) * fma(3.0, (y + -1.0), (0.3333333333333333 / x));
}
function code(x, y) return Float64(sqrt(x) * fma(3.0, Float64(y + -1.0), Float64(0.3333333333333333 / x))) end
code[x_, y_] := N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * N[(y + -1.0), $MachinePrecision] + N[(0.3333333333333333 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\sqrt{x} \cdot \mathsf{fma}\left(3, y + -1, \frac{0.3333333333333333}{x}\right)
\end{array}
Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in x around 0 99.4%
fma-def99.4%
sub-neg99.4%
metadata-eval99.4%
associate-*r/99.4%
metadata-eval99.4%
Simplified99.4%
Final simplification99.4%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* (sqrt x) (/ 0.3333333333333333 x)))
(t_1 (* 3.0 (* (sqrt x) y)))
(t_2 (* (sqrt x) -3.0))
(t_3 (* (sqrt x) (* 3.0 y))))
(if (<= x 5e-105)
t_0
(if (<= x 1.75e-96)
t_3
(if (<= x 9.6e-40)
t_0
(if (<= x 1.65e+70)
t_1
(if (<= x 5e+135)
t_2
(if (<= x 2.6e+221) t_3 (if (<= x 6.6e+239) t_2 t_1)))))))))
double code(double x, double y) {
double t_0 = sqrt(x) * (0.3333333333333333 / x);
double t_1 = 3.0 * (sqrt(x) * y);
double t_2 = sqrt(x) * -3.0;
double t_3 = sqrt(x) * (3.0 * y);
double tmp;
if (x <= 5e-105) {
tmp = t_0;
} else if (x <= 1.75e-96) {
tmp = t_3;
} else if (x <= 9.6e-40) {
tmp = t_0;
} else if (x <= 1.65e+70) {
tmp = t_1;
} else if (x <= 5e+135) {
tmp = t_2;
} else if (x <= 2.6e+221) {
tmp = t_3;
} else if (x <= 6.6e+239) {
tmp = t_2;
} else {
tmp = t_1;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: t_0
real(8) :: t_1
real(8) :: t_2
real(8) :: t_3
real(8) :: tmp
t_0 = sqrt(x) * (0.3333333333333333d0 / x)
t_1 = 3.0d0 * (sqrt(x) * y)
t_2 = sqrt(x) * (-3.0d0)
t_3 = sqrt(x) * (3.0d0 * y)
if (x <= 5d-105) then
tmp = t_0
else if (x <= 1.75d-96) then
tmp = t_3
else if (x <= 9.6d-40) then
tmp = t_0
else if (x <= 1.65d+70) then
tmp = t_1
else if (x <= 5d+135) then
tmp = t_2
else if (x <= 2.6d+221) then
tmp = t_3
else if (x <= 6.6d+239) then
tmp = t_2
else
tmp = t_1
end if
code = tmp
end function
public static double code(double x, double y) {
double t_0 = Math.sqrt(x) * (0.3333333333333333 / x);
double t_1 = 3.0 * (Math.sqrt(x) * y);
double t_2 = Math.sqrt(x) * -3.0;
double t_3 = Math.sqrt(x) * (3.0 * y);
double tmp;
if (x <= 5e-105) {
tmp = t_0;
} else if (x <= 1.75e-96) {
tmp = t_3;
} else if (x <= 9.6e-40) {
tmp = t_0;
} else if (x <= 1.65e+70) {
tmp = t_1;
} else if (x <= 5e+135) {
tmp = t_2;
} else if (x <= 2.6e+221) {
tmp = t_3;
} else if (x <= 6.6e+239) {
tmp = t_2;
} else {
tmp = t_1;
}
return tmp;
}
def code(x, y): t_0 = math.sqrt(x) * (0.3333333333333333 / x) t_1 = 3.0 * (math.sqrt(x) * y) t_2 = math.sqrt(x) * -3.0 t_3 = math.sqrt(x) * (3.0 * y) tmp = 0 if x <= 5e-105: tmp = t_0 elif x <= 1.75e-96: tmp = t_3 elif x <= 9.6e-40: tmp = t_0 elif x <= 1.65e+70: tmp = t_1 elif x <= 5e+135: tmp = t_2 elif x <= 2.6e+221: tmp = t_3 elif x <= 6.6e+239: tmp = t_2 else: tmp = t_1 return tmp
function code(x, y) t_0 = Float64(sqrt(x) * Float64(0.3333333333333333 / x)) t_1 = Float64(3.0 * Float64(sqrt(x) * y)) t_2 = Float64(sqrt(x) * -3.0) t_3 = Float64(sqrt(x) * Float64(3.0 * y)) tmp = 0.0 if (x <= 5e-105) tmp = t_0; elseif (x <= 1.75e-96) tmp = t_3; elseif (x <= 9.6e-40) tmp = t_0; elseif (x <= 1.65e+70) tmp = t_1; elseif (x <= 5e+135) tmp = t_2; elseif (x <= 2.6e+221) tmp = t_3; elseif (x <= 6.6e+239) tmp = t_2; else tmp = t_1; end return tmp end
function tmp_2 = code(x, y) t_0 = sqrt(x) * (0.3333333333333333 / x); t_1 = 3.0 * (sqrt(x) * y); t_2 = sqrt(x) * -3.0; t_3 = sqrt(x) * (3.0 * y); tmp = 0.0; if (x <= 5e-105) tmp = t_0; elseif (x <= 1.75e-96) tmp = t_3; elseif (x <= 9.6e-40) tmp = t_0; elseif (x <= 1.65e+70) tmp = t_1; elseif (x <= 5e+135) tmp = t_2; elseif (x <= 2.6e+221) tmp = t_3; elseif (x <= 6.6e+239) tmp = t_2; else tmp = t_1; end tmp_2 = tmp; end
code[x_, y_] := Block[{t$95$0 = N[(N[Sqrt[x], $MachinePrecision] * N[(0.3333333333333333 / x), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(3.0 * N[(N[Sqrt[x], $MachinePrecision] * y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision]}, Block[{t$95$3 = N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * y), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[x, 5e-105], t$95$0, If[LessEqual[x, 1.75e-96], t$95$3, If[LessEqual[x, 9.6e-40], t$95$0, If[LessEqual[x, 1.65e+70], t$95$1, If[LessEqual[x, 5e+135], t$95$2, If[LessEqual[x, 2.6e+221], t$95$3, If[LessEqual[x, 6.6e+239], t$95$2, t$95$1]]]]]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sqrt{x} \cdot \frac{0.3333333333333333}{x}\\
t_1 := 3 \cdot \left(\sqrt{x} \cdot y\right)\\
t_2 := \sqrt{x} \cdot -3\\
t_3 := \sqrt{x} \cdot \left(3 \cdot y\right)\\
\mathbf{if}\;x \leq 5 \cdot 10^{-105}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;x \leq 1.75 \cdot 10^{-96}:\\
\;\;\;\;t\_3\\
\mathbf{elif}\;x \leq 9.6 \cdot 10^{-40}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;x \leq 1.65 \cdot 10^{+70}:\\
\;\;\;\;t\_1\\
\mathbf{elif}\;x \leq 5 \cdot 10^{+135}:\\
\;\;\;\;t\_2\\
\mathbf{elif}\;x \leq 2.6 \cdot 10^{+221}:\\
\;\;\;\;t\_3\\
\mathbf{elif}\;x \leq 6.6 \cdot 10^{+239}:\\
\;\;\;\;t\_2\\
\mathbf{else}:\\
\;\;\;\;t\_1\\
\end{array}
\end{array}
if x < 4.99999999999999963e-105 or 1.7499999999999999e-96 < x < 9.59999999999999965e-40Initial program 99.2%
*-commutative99.2%
associate-*l*99.2%
+-commutative99.2%
associate--l+99.2%
*-commutative99.2%
associate-/r*99.2%
metadata-eval99.2%
sub-neg99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around 0 85.2%
if 4.99999999999999963e-105 < x < 1.7499999999999999e-96 or 5.00000000000000029e135 < x < 2.60000000000000004e221Initial program 99.5%
*-commutative99.5%
associate-*l*99.6%
+-commutative99.6%
associate--l+99.6%
*-commutative99.6%
associate-/r*99.6%
metadata-eval99.6%
sub-neg99.6%
metadata-eval99.6%
Simplified99.6%
Taylor expanded in y around inf 72.9%
*-commutative72.9%
associate-*l*73.0%
*-commutative73.0%
Simplified73.0%
if 9.59999999999999965e-40 < x < 1.65000000000000008e70 or 6.5999999999999997e239 < x Initial program 99.6%
*-commutative99.6%
associate-*l*99.6%
+-commutative99.6%
associate--l+99.6%
*-commutative99.6%
associate-/r*99.6%
metadata-eval99.6%
sub-neg99.6%
metadata-eval99.6%
Simplified99.6%
Taylor expanded in y around inf 65.3%
if 1.65000000000000008e70 < x < 5.00000000000000029e135 or 2.60000000000000004e221 < x < 6.5999999999999997e239Initial program 99.5%
*-commutative99.5%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in x around inf 99.4%
Taylor expanded in y around 0 70.2%
*-commutative70.2%
Simplified70.2%
Final simplification76.5%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* (sqrt x) (/ 0.3333333333333333 x))))
(if (<= x 5e-105)
t_0
(if (<= x 1.75e-96)
(* (sqrt x) (* 3.0 y))
(if (<= x 2.35e-39) t_0 (* (sqrt x) (* 3.0 (+ y -1.0))))))))
double code(double x, double y) {
double t_0 = sqrt(x) * (0.3333333333333333 / x);
double tmp;
if (x <= 5e-105) {
tmp = t_0;
} else if (x <= 1.75e-96) {
tmp = sqrt(x) * (3.0 * y);
} else if (x <= 2.35e-39) {
tmp = t_0;
} else {
tmp = sqrt(x) * (3.0 * (y + -1.0));
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: t_0
real(8) :: tmp
t_0 = sqrt(x) * (0.3333333333333333d0 / x)
if (x <= 5d-105) then
tmp = t_0
else if (x <= 1.75d-96) then
tmp = sqrt(x) * (3.0d0 * y)
else if (x <= 2.35d-39) then
tmp = t_0
else
tmp = sqrt(x) * (3.0d0 * (y + (-1.0d0)))
end if
code = tmp
end function
public static double code(double x, double y) {
double t_0 = Math.sqrt(x) * (0.3333333333333333 / x);
double tmp;
if (x <= 5e-105) {
tmp = t_0;
} else if (x <= 1.75e-96) {
tmp = Math.sqrt(x) * (3.0 * y);
} else if (x <= 2.35e-39) {
tmp = t_0;
} else {
tmp = Math.sqrt(x) * (3.0 * (y + -1.0));
}
return tmp;
}
def code(x, y): t_0 = math.sqrt(x) * (0.3333333333333333 / x) tmp = 0 if x <= 5e-105: tmp = t_0 elif x <= 1.75e-96: tmp = math.sqrt(x) * (3.0 * y) elif x <= 2.35e-39: tmp = t_0 else: tmp = math.sqrt(x) * (3.0 * (y + -1.0)) return tmp
function code(x, y) t_0 = Float64(sqrt(x) * Float64(0.3333333333333333 / x)) tmp = 0.0 if (x <= 5e-105) tmp = t_0; elseif (x <= 1.75e-96) tmp = Float64(sqrt(x) * Float64(3.0 * y)); elseif (x <= 2.35e-39) tmp = t_0; else tmp = Float64(sqrt(x) * Float64(3.0 * Float64(y + -1.0))); end return tmp end
function tmp_2 = code(x, y) t_0 = sqrt(x) * (0.3333333333333333 / x); tmp = 0.0; if (x <= 5e-105) tmp = t_0; elseif (x <= 1.75e-96) tmp = sqrt(x) * (3.0 * y); elseif (x <= 2.35e-39) tmp = t_0; else tmp = sqrt(x) * (3.0 * (y + -1.0)); end tmp_2 = tmp; end
code[x_, y_] := Block[{t$95$0 = N[(N[Sqrt[x], $MachinePrecision] * N[(0.3333333333333333 / x), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[x, 5e-105], t$95$0, If[LessEqual[x, 1.75e-96], N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * y), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 2.35e-39], t$95$0, N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * N[(y + -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sqrt{x} \cdot \frac{0.3333333333333333}{x}\\
\mathbf{if}\;x \leq 5 \cdot 10^{-105}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;x \leq 1.75 \cdot 10^{-96}:\\
\;\;\;\;\sqrt{x} \cdot \left(3 \cdot y\right)\\
\mathbf{elif}\;x \leq 2.35 \cdot 10^{-39}:\\
\;\;\;\;t\_0\\
\mathbf{else}:\\
\;\;\;\;\sqrt{x} \cdot \left(3 \cdot \left(y + -1\right)\right)\\
\end{array}
\end{array}
if x < 4.99999999999999963e-105 or 1.7499999999999999e-96 < x < 2.3500000000000001e-39Initial program 99.2%
*-commutative99.2%
associate-*l*99.2%
+-commutative99.2%
associate--l+99.2%
*-commutative99.2%
associate-/r*99.2%
metadata-eval99.2%
sub-neg99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around 0 85.2%
if 4.99999999999999963e-105 < x < 1.7499999999999999e-96Initial program 99.4%
*-commutative99.4%
associate-*l*99.7%
+-commutative99.7%
associate--l+99.7%
*-commutative99.7%
associate-/r*99.7%
metadata-eval99.7%
sub-neg99.7%
metadata-eval99.7%
Simplified99.7%
Taylor expanded in y around inf 90.4%
*-commutative90.4%
associate-*l*90.4%
*-commutative90.4%
Simplified90.4%
if 2.3500000000000001e-39 < x Initial program 99.5%
*-commutative99.5%
associate-*l*99.5%
+-commutative99.5%
associate--l+99.5%
*-commutative99.5%
associate-/r*99.5%
metadata-eval99.5%
sub-neg99.5%
metadata-eval99.5%
Simplified99.5%
Taylor expanded in x around inf 95.9%
Final simplification90.8%
(FPCore (x y)
:precision binary64
(if (<= x 5e-105)
(* 3.0 (* (sqrt x) (+ -1.0 (/ 0.1111111111111111 x))))
(if (<= x 1.75e-96)
(* (sqrt x) (* 3.0 y))
(if (<= x 1.08e-38)
(* (sqrt x) (/ 0.3333333333333333 x))
(* (sqrt x) (* 3.0 (+ y -1.0)))))))
double code(double x, double y) {
double tmp;
if (x <= 5e-105) {
tmp = 3.0 * (sqrt(x) * (-1.0 + (0.1111111111111111 / x)));
} else if (x <= 1.75e-96) {
tmp = sqrt(x) * (3.0 * y);
} else if (x <= 1.08e-38) {
tmp = sqrt(x) * (0.3333333333333333 / x);
} else {
tmp = sqrt(x) * (3.0 * (y + -1.0));
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (x <= 5d-105) then
tmp = 3.0d0 * (sqrt(x) * ((-1.0d0) + (0.1111111111111111d0 / x)))
else if (x <= 1.75d-96) then
tmp = sqrt(x) * (3.0d0 * y)
else if (x <= 1.08d-38) then
tmp = sqrt(x) * (0.3333333333333333d0 / x)
else
tmp = sqrt(x) * (3.0d0 * (y + (-1.0d0)))
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (x <= 5e-105) {
tmp = 3.0 * (Math.sqrt(x) * (-1.0 + (0.1111111111111111 / x)));
} else if (x <= 1.75e-96) {
tmp = Math.sqrt(x) * (3.0 * y);
} else if (x <= 1.08e-38) {
tmp = Math.sqrt(x) * (0.3333333333333333 / x);
} else {
tmp = Math.sqrt(x) * (3.0 * (y + -1.0));
}
return tmp;
}
def code(x, y): tmp = 0 if x <= 5e-105: tmp = 3.0 * (math.sqrt(x) * (-1.0 + (0.1111111111111111 / x))) elif x <= 1.75e-96: tmp = math.sqrt(x) * (3.0 * y) elif x <= 1.08e-38: tmp = math.sqrt(x) * (0.3333333333333333 / x) else: tmp = math.sqrt(x) * (3.0 * (y + -1.0)) return tmp
function code(x, y) tmp = 0.0 if (x <= 5e-105) tmp = Float64(3.0 * Float64(sqrt(x) * Float64(-1.0 + Float64(0.1111111111111111 / x)))); elseif (x <= 1.75e-96) tmp = Float64(sqrt(x) * Float64(3.0 * y)); elseif (x <= 1.08e-38) tmp = Float64(sqrt(x) * Float64(0.3333333333333333 / x)); else tmp = Float64(sqrt(x) * Float64(3.0 * Float64(y + -1.0))); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (x <= 5e-105) tmp = 3.0 * (sqrt(x) * (-1.0 + (0.1111111111111111 / x))); elseif (x <= 1.75e-96) tmp = sqrt(x) * (3.0 * y); elseif (x <= 1.08e-38) tmp = sqrt(x) * (0.3333333333333333 / x); else tmp = sqrt(x) * (3.0 * (y + -1.0)); end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[x, 5e-105], N[(3.0 * N[(N[Sqrt[x], $MachinePrecision] * N[(-1.0 + N[(0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 1.75e-96], N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * y), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 1.08e-38], N[(N[Sqrt[x], $MachinePrecision] * N[(0.3333333333333333 / x), $MachinePrecision]), $MachinePrecision], N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * N[(y + -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 5 \cdot 10^{-105}:\\
\;\;\;\;3 \cdot \left(\sqrt{x} \cdot \left(-1 + \frac{0.1111111111111111}{x}\right)\right)\\
\mathbf{elif}\;x \leq 1.75 \cdot 10^{-96}:\\
\;\;\;\;\sqrt{x} \cdot \left(3 \cdot y\right)\\
\mathbf{elif}\;x \leq 1.08 \cdot 10^{-38}:\\
\;\;\;\;\sqrt{x} \cdot \frac{0.3333333333333333}{x}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{x} \cdot \left(3 \cdot \left(y + -1\right)\right)\\
\end{array}
\end{array}
if x < 4.99999999999999963e-105Initial program 99.1%
*-commutative99.1%
associate-*l*99.1%
+-commutative99.1%
associate--l+99.1%
*-commutative99.1%
associate-/r*99.1%
metadata-eval99.1%
sub-neg99.1%
metadata-eval99.1%
Simplified99.1%
Taylor expanded in y around 0 83.6%
sub-neg83.6%
associate-*r/83.8%
metadata-eval83.8%
metadata-eval83.8%
Simplified83.8%
if 4.99999999999999963e-105 < x < 1.7499999999999999e-96Initial program 99.4%
*-commutative99.4%
associate-*l*99.7%
+-commutative99.7%
associate--l+99.7%
*-commutative99.7%
associate-/r*99.7%
metadata-eval99.7%
sub-neg99.7%
metadata-eval99.7%
Simplified99.7%
Taylor expanded in y around inf 90.4%
*-commutative90.4%
associate-*l*90.4%
*-commutative90.4%
Simplified90.4%
if 1.7499999999999999e-96 < x < 1.08e-38Initial program 99.3%
*-commutative99.3%
associate-*l*99.5%
+-commutative99.5%
associate--l+99.5%
*-commutative99.5%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in x around 0 91.1%
if 1.08e-38 < x Initial program 99.5%
*-commutative99.5%
associate-*l*99.5%
+-commutative99.5%
associate--l+99.5%
*-commutative99.5%
associate-/r*99.5%
metadata-eval99.5%
sub-neg99.5%
metadata-eval99.5%
Simplified99.5%
Taylor expanded in x around inf 95.9%
Final simplification90.8%
(FPCore (x y) :precision binary64 (if (or (<= y -1.0) (not (<= y 1.0))) (* 3.0 (* (sqrt x) y)) (* (sqrt x) -3.0)))
double code(double x, double y) {
double tmp;
if ((y <= -1.0) || !(y <= 1.0)) {
tmp = 3.0 * (sqrt(x) * y);
} else {
tmp = sqrt(x) * -3.0;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((y <= (-1.0d0)) .or. (.not. (y <= 1.0d0))) then
tmp = 3.0d0 * (sqrt(x) * y)
else
tmp = sqrt(x) * (-3.0d0)
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((y <= -1.0) || !(y <= 1.0)) {
tmp = 3.0 * (Math.sqrt(x) * y);
} else {
tmp = Math.sqrt(x) * -3.0;
}
return tmp;
}
def code(x, y): tmp = 0 if (y <= -1.0) or not (y <= 1.0): tmp = 3.0 * (math.sqrt(x) * y) else: tmp = math.sqrt(x) * -3.0 return tmp
function code(x, y) tmp = 0.0 if ((y <= -1.0) || !(y <= 1.0)) tmp = Float64(3.0 * Float64(sqrt(x) * y)); else tmp = Float64(sqrt(x) * -3.0); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((y <= -1.0) || ~((y <= 1.0))) tmp = 3.0 * (sqrt(x) * y); else tmp = sqrt(x) * -3.0; end tmp_2 = tmp; end
code[x_, y_] := If[Or[LessEqual[y, -1.0], N[Not[LessEqual[y, 1.0]], $MachinePrecision]], N[(3.0 * N[(N[Sqrt[x], $MachinePrecision] * y), $MachinePrecision]), $MachinePrecision], N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq -1 \lor \neg \left(y \leq 1\right):\\
\;\;\;\;3 \cdot \left(\sqrt{x} \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;\sqrt{x} \cdot -3\\
\end{array}
\end{array}
if y < -1 or 1 < y Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in y around inf 69.9%
if -1 < y < 1Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in x around inf 44.3%
Taylor expanded in y around 0 42.8%
*-commutative42.8%
Simplified42.8%
Final simplification57.5%
(FPCore (x y) :precision binary64 (if (<= y -1.0) (* 3.0 (* (sqrt x) y)) (if (<= y 1.0) (* (sqrt x) -3.0) (* (sqrt x) (* 3.0 y)))))
double code(double x, double y) {
double tmp;
if (y <= -1.0) {
tmp = 3.0 * (sqrt(x) * y);
} else if (y <= 1.0) {
tmp = sqrt(x) * -3.0;
} else {
tmp = sqrt(x) * (3.0 * y);
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (y <= (-1.0d0)) then
tmp = 3.0d0 * (sqrt(x) * y)
else if (y <= 1.0d0) then
tmp = sqrt(x) * (-3.0d0)
else
tmp = sqrt(x) * (3.0d0 * y)
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (y <= -1.0) {
tmp = 3.0 * (Math.sqrt(x) * y);
} else if (y <= 1.0) {
tmp = Math.sqrt(x) * -3.0;
} else {
tmp = Math.sqrt(x) * (3.0 * y);
}
return tmp;
}
def code(x, y): tmp = 0 if y <= -1.0: tmp = 3.0 * (math.sqrt(x) * y) elif y <= 1.0: tmp = math.sqrt(x) * -3.0 else: tmp = math.sqrt(x) * (3.0 * y) return tmp
function code(x, y) tmp = 0.0 if (y <= -1.0) tmp = Float64(3.0 * Float64(sqrt(x) * y)); elseif (y <= 1.0) tmp = Float64(sqrt(x) * -3.0); else tmp = Float64(sqrt(x) * Float64(3.0 * y)); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (y <= -1.0) tmp = 3.0 * (sqrt(x) * y); elseif (y <= 1.0) tmp = sqrt(x) * -3.0; else tmp = sqrt(x) * (3.0 * y); end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[y, -1.0], N[(3.0 * N[(N[Sqrt[x], $MachinePrecision] * y), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 1.0], N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision], N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * y), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq -1:\\
\;\;\;\;3 \cdot \left(\sqrt{x} \cdot y\right)\\
\mathbf{elif}\;y \leq 1:\\
\;\;\;\;\sqrt{x} \cdot -3\\
\mathbf{else}:\\
\;\;\;\;\sqrt{x} \cdot \left(3 \cdot y\right)\\
\end{array}
\end{array}
if y < -1Initial program 99.4%
*-commutative99.4%
associate-*l*99.5%
+-commutative99.5%
associate--l+99.5%
*-commutative99.5%
associate-/r*99.5%
metadata-eval99.5%
sub-neg99.5%
metadata-eval99.5%
Simplified99.5%
Taylor expanded in y around inf 68.7%
if -1 < y < 1Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in x around inf 44.3%
Taylor expanded in y around 0 42.8%
*-commutative42.8%
Simplified42.8%
if 1 < y Initial program 99.3%
*-commutative99.3%
associate-*l*99.2%
+-commutative99.2%
associate--l+99.2%
*-commutative99.2%
associate-/r*99.2%
metadata-eval99.2%
sub-neg99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in y around inf 71.3%
*-commutative71.3%
associate-*l*71.3%
*-commutative71.3%
Simplified71.3%
Final simplification57.5%
(FPCore (x y) :precision binary64 (if (<= x 6.5e-7) (* (sqrt x) (+ (/ 0.3333333333333333 x) (* 3.0 y))) (* (sqrt x) (* 3.0 (+ y -1.0)))))
double code(double x, double y) {
double tmp;
if (x <= 6.5e-7) {
tmp = sqrt(x) * ((0.3333333333333333 / x) + (3.0 * y));
} else {
tmp = sqrt(x) * (3.0 * (y + -1.0));
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (x <= 6.5d-7) then
tmp = sqrt(x) * ((0.3333333333333333d0 / x) + (3.0d0 * y))
else
tmp = sqrt(x) * (3.0d0 * (y + (-1.0d0)))
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (x <= 6.5e-7) {
tmp = Math.sqrt(x) * ((0.3333333333333333 / x) + (3.0 * y));
} else {
tmp = Math.sqrt(x) * (3.0 * (y + -1.0));
}
return tmp;
}
def code(x, y): tmp = 0 if x <= 6.5e-7: tmp = math.sqrt(x) * ((0.3333333333333333 / x) + (3.0 * y)) else: tmp = math.sqrt(x) * (3.0 * (y + -1.0)) return tmp
function code(x, y) tmp = 0.0 if (x <= 6.5e-7) tmp = Float64(sqrt(x) * Float64(Float64(0.3333333333333333 / x) + Float64(3.0 * y))); else tmp = Float64(sqrt(x) * Float64(3.0 * Float64(y + -1.0))); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (x <= 6.5e-7) tmp = sqrt(x) * ((0.3333333333333333 / x) + (3.0 * y)); else tmp = sqrt(x) * (3.0 * (y + -1.0)); end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[x, 6.5e-7], N[(N[Sqrt[x], $MachinePrecision] * N[(N[(0.3333333333333333 / x), $MachinePrecision] + N[(3.0 * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * N[(y + -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 6.5 \cdot 10^{-7}:\\
\;\;\;\;\sqrt{x} \cdot \left(\frac{0.3333333333333333}{x} + 3 \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;\sqrt{x} \cdot \left(3 \cdot \left(y + -1\right)\right)\\
\end{array}
\end{array}
if x < 6.50000000000000024e-7Initial program 99.2%
*-commutative99.2%
associate-*l*99.2%
+-commutative99.2%
associate--l+99.2%
*-commutative99.2%
associate-/r*99.2%
metadata-eval99.2%
sub-neg99.2%
metadata-eval99.2%
Simplified99.2%
distribute-lft-in99.2%
div-inv99.2%
associate-*r*99.2%
metadata-eval99.2%
div-inv99.2%
+-commutative99.2%
distribute-rgt-in99.2%
metadata-eval99.2%
Applied egg-rr99.2%
Taylor expanded in y around inf 98.8%
if 6.50000000000000024e-7 < x Initial program 99.6%
*-commutative99.6%
associate-*l*99.6%
+-commutative99.6%
associate--l+99.6%
*-commutative99.6%
associate-/r*99.6%
metadata-eval99.6%
sub-neg99.6%
metadata-eval99.6%
Simplified99.6%
Taylor expanded in x around inf 98.0%
Final simplification98.4%
(FPCore (x y) :precision binary64 (* (sqrt x) (* 3.0 (+ (+ y -1.0) (/ -1.0 (* x -9.0))))))
double code(double x, double y) {
return sqrt(x) * (3.0 * ((y + -1.0) + (-1.0 / (x * -9.0))));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = sqrt(x) * (3.0d0 * ((y + (-1.0d0)) + ((-1.0d0) / (x * (-9.0d0)))))
end function
public static double code(double x, double y) {
return Math.sqrt(x) * (3.0 * ((y + -1.0) + (-1.0 / (x * -9.0))));
}
def code(x, y): return math.sqrt(x) * (3.0 * ((y + -1.0) + (-1.0 / (x * -9.0))))
function code(x, y) return Float64(sqrt(x) * Float64(3.0 * Float64(Float64(y + -1.0) + Float64(-1.0 / Float64(x * -9.0))))) end
function tmp = code(x, y) tmp = sqrt(x) * (3.0 * ((y + -1.0) + (-1.0 / (x * -9.0)))); end
code[x_, y_] := N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * N[(N[(y + -1.0), $MachinePrecision] + N[(-1.0 / N[(x * -9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\sqrt{x} \cdot \left(3 \cdot \left(\left(y + -1\right) + \frac{-1}{x \cdot -9}\right)\right)
\end{array}
Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
clear-num99.3%
div-inv99.4%
metadata-eval99.4%
frac-2neg99.4%
metadata-eval99.4%
div-inv99.4%
distribute-rgt-neg-in99.4%
metadata-eval99.4%
Applied egg-rr99.4%
Final simplification99.4%
(FPCore (x y) :precision binary64 (* (sqrt x) (* 3.0 (+ (+ y -1.0) (/ 0.1111111111111111 x)))))
double code(double x, double y) {
return sqrt(x) * (3.0 * ((y + -1.0) + (0.1111111111111111 / x)));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = sqrt(x) * (3.0d0 * ((y + (-1.0d0)) + (0.1111111111111111d0 / x)))
end function
public static double code(double x, double y) {
return Math.sqrt(x) * (3.0 * ((y + -1.0) + (0.1111111111111111 / x)));
}
def code(x, y): return math.sqrt(x) * (3.0 * ((y + -1.0) + (0.1111111111111111 / x)))
function code(x, y) return Float64(sqrt(x) * Float64(3.0 * Float64(Float64(y + -1.0) + Float64(0.1111111111111111 / x)))) end
function tmp = code(x, y) tmp = sqrt(x) * (3.0 * ((y + -1.0) + (0.1111111111111111 / x))); end
code[x_, y_] := N[(N[Sqrt[x], $MachinePrecision] * N[(3.0 * N[(N[(y + -1.0), $MachinePrecision] + N[(0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\sqrt{x} \cdot \left(3 \cdot \left(\left(y + -1\right) + \frac{0.1111111111111111}{x}\right)\right)
\end{array}
Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
Final simplification99.4%
(FPCore (x y) :precision binary64 (* (sqrt x) (+ (/ 0.3333333333333333 x) (+ -3.0 (* 3.0 y)))))
double code(double x, double y) {
return sqrt(x) * ((0.3333333333333333 / x) + (-3.0 + (3.0 * y)));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = sqrt(x) * ((0.3333333333333333d0 / x) + ((-3.0d0) + (3.0d0 * y)))
end function
public static double code(double x, double y) {
return Math.sqrt(x) * ((0.3333333333333333 / x) + (-3.0 + (3.0 * y)));
}
def code(x, y): return math.sqrt(x) * ((0.3333333333333333 / x) + (-3.0 + (3.0 * y)))
function code(x, y) return Float64(sqrt(x) * Float64(Float64(0.3333333333333333 / x) + Float64(-3.0 + Float64(3.0 * y)))) end
function tmp = code(x, y) tmp = sqrt(x) * ((0.3333333333333333 / x) + (-3.0 + (3.0 * y))); end
code[x_, y_] := N[(N[Sqrt[x], $MachinePrecision] * N[(N[(0.3333333333333333 / x), $MachinePrecision] + N[(-3.0 + N[(3.0 * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\sqrt{x} \cdot \left(\frac{0.3333333333333333}{x} + \left(-3 + 3 \cdot y\right)\right)
\end{array}
Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
distribute-lft-in99.4%
div-inv99.4%
associate-*r*99.4%
metadata-eval99.4%
div-inv99.4%
+-commutative99.4%
distribute-rgt-in99.4%
metadata-eval99.4%
Applied egg-rr99.4%
Final simplification99.4%
(FPCore (x y) :precision binary64 (* (sqrt x) -3.0))
double code(double x, double y) {
return sqrt(x) * -3.0;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = sqrt(x) * (-3.0d0)
end function
public static double code(double x, double y) {
return Math.sqrt(x) * -3.0;
}
def code(x, y): return math.sqrt(x) * -3.0
function code(x, y) return Float64(sqrt(x) * -3.0) end
function tmp = code(x, y) tmp = sqrt(x) * -3.0; end
code[x_, y_] := N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision]
\begin{array}{l}
\\
\sqrt{x} \cdot -3
\end{array}
Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
+-commutative99.4%
associate--l+99.4%
*-commutative99.4%
associate-/r*99.4%
metadata-eval99.4%
sub-neg99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in x around inf 58.6%
Taylor expanded in y around 0 21.0%
*-commutative21.0%
Simplified21.0%
Final simplification21.0%
(FPCore (x y) :precision binary64 (* 3.0 (+ (* y (sqrt x)) (* (- (/ 1.0 (* x 9.0)) 1.0) (sqrt x)))))
double code(double x, double y) {
return 3.0 * ((y * sqrt(x)) + (((1.0 / (x * 9.0)) - 1.0) * sqrt(x)));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = 3.0d0 * ((y * sqrt(x)) + (((1.0d0 / (x * 9.0d0)) - 1.0d0) * sqrt(x)))
end function
public static double code(double x, double y) {
return 3.0 * ((y * Math.sqrt(x)) + (((1.0 / (x * 9.0)) - 1.0) * Math.sqrt(x)));
}
def code(x, y): return 3.0 * ((y * math.sqrt(x)) + (((1.0 / (x * 9.0)) - 1.0) * math.sqrt(x)))
function code(x, y) return Float64(3.0 * Float64(Float64(y * sqrt(x)) + Float64(Float64(Float64(1.0 / Float64(x * 9.0)) - 1.0) * sqrt(x)))) end
function tmp = code(x, y) tmp = 3.0 * ((y * sqrt(x)) + (((1.0 / (x * 9.0)) - 1.0) * sqrt(x))); end
code[x_, y_] := N[(3.0 * N[(N[(y * N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + N[(N[(N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision] - 1.0), $MachinePrecision] * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
3 \cdot \left(y \cdot \sqrt{x} + \left(\frac{1}{x \cdot 9} - 1\right) \cdot \sqrt{x}\right)
\end{array}
herbie shell --seed 2024027
(FPCore (x y)
:name "Numeric.SpecFunctions:incompleteGamma from math-functions-0.1.5.2, B"
:precision binary64
:herbie-target
(* 3.0 (+ (* y (sqrt x)) (* (- (/ 1.0 (* x 9.0)) 1.0) (sqrt x))))
(* (* 3.0 (sqrt x)) (- (+ y (/ 1.0 (* x 9.0))) 1.0)))