
(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 10 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 (* (pow (/ 0.1111111111111111 x) -0.5) (+ (/ 0.1111111111111111 x) (+ y -1.0))))
double code(double x, double y) {
return pow((0.1111111111111111 / x), -0.5) * ((0.1111111111111111 / x) + (y + -1.0));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = ((0.1111111111111111d0 / x) ** (-0.5d0)) * ((0.1111111111111111d0 / x) + (y + (-1.0d0)))
end function
public static double code(double x, double y) {
return Math.pow((0.1111111111111111 / x), -0.5) * ((0.1111111111111111 / x) + (y + -1.0));
}
def code(x, y): return math.pow((0.1111111111111111 / x), -0.5) * ((0.1111111111111111 / x) + (y + -1.0))
function code(x, y) return Float64((Float64(0.1111111111111111 / x) ^ -0.5) * Float64(Float64(0.1111111111111111 / x) + Float64(y + -1.0))) end
function tmp = code(x, y) tmp = ((0.1111111111111111 / x) ^ -0.5) * ((0.1111111111111111 / x) + (y + -1.0)); end
code[x_, y_] := N[(N[Power[N[(0.1111111111111111 / x), $MachinePrecision], -0.5], $MachinePrecision] * N[(N[(0.1111111111111111 / x), $MachinePrecision] + N[(y + -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
{\left(\frac{0.1111111111111111}{x}\right)}^{-0.5} \cdot \left(\frac{0.1111111111111111}{x} + \left(y + -1\right)\right)
\end{array}
Initial program 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%
*-commutative99.4%
metadata-eval99.4%
sqrt-prod99.2%
pow1/299.2%
Applied egg-rr99.2%
unpow1/299.2%
Simplified99.2%
metadata-eval99.2%
div-inv99.1%
clear-num99.2%
Applied egg-rr99.2%
inv-pow99.2%
sqrt-pow199.6%
metadata-eval99.6%
Applied egg-rr99.6%
(FPCore (x y)
:precision binary64
(let* ((t_0 (/ 1.0 (* x 9.0))) (t_1 (* (* (sqrt x) 3.0) (+ -1.0 (+ y t_0)))))
(if (<= t_1 -5e+159)
(* 3.0 (* y (sqrt x)))
(if (<= t_1 -5.0)
(* (sqrt x) -3.0)
(if (<= t_1 2e+153) (sqrt t_0) (* y (sqrt (* x 9.0))))))))
double code(double x, double y) {
double t_0 = 1.0 / (x * 9.0);
double t_1 = (sqrt(x) * 3.0) * (-1.0 + (y + t_0));
double tmp;
if (t_1 <= -5e+159) {
tmp = 3.0 * (y * sqrt(x));
} else if (t_1 <= -5.0) {
tmp = sqrt(x) * -3.0;
} else if (t_1 <= 2e+153) {
tmp = sqrt(t_0);
} else {
tmp = y * sqrt((x * 9.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) :: t_1
real(8) :: tmp
t_0 = 1.0d0 / (x * 9.0d0)
t_1 = (sqrt(x) * 3.0d0) * ((-1.0d0) + (y + t_0))
if (t_1 <= (-5d+159)) then
tmp = 3.0d0 * (y * sqrt(x))
else if (t_1 <= (-5.0d0)) then
tmp = sqrt(x) * (-3.0d0)
else if (t_1 <= 2d+153) then
tmp = sqrt(t_0)
else
tmp = y * sqrt((x * 9.0d0))
end if
code = tmp
end function
public static double code(double x, double y) {
double t_0 = 1.0 / (x * 9.0);
double t_1 = (Math.sqrt(x) * 3.0) * (-1.0 + (y + t_0));
double tmp;
if (t_1 <= -5e+159) {
tmp = 3.0 * (y * Math.sqrt(x));
} else if (t_1 <= -5.0) {
tmp = Math.sqrt(x) * -3.0;
} else if (t_1 <= 2e+153) {
tmp = Math.sqrt(t_0);
} else {
tmp = y * Math.sqrt((x * 9.0));
}
return tmp;
}
def code(x, y): t_0 = 1.0 / (x * 9.0) t_1 = (math.sqrt(x) * 3.0) * (-1.0 + (y + t_0)) tmp = 0 if t_1 <= -5e+159: tmp = 3.0 * (y * math.sqrt(x)) elif t_1 <= -5.0: tmp = math.sqrt(x) * -3.0 elif t_1 <= 2e+153: tmp = math.sqrt(t_0) else: tmp = y * math.sqrt((x * 9.0)) return tmp
function code(x, y) t_0 = Float64(1.0 / Float64(x * 9.0)) t_1 = Float64(Float64(sqrt(x) * 3.0) * Float64(-1.0 + Float64(y + t_0))) tmp = 0.0 if (t_1 <= -5e+159) tmp = Float64(3.0 * Float64(y * sqrt(x))); elseif (t_1 <= -5.0) tmp = Float64(sqrt(x) * -3.0); elseif (t_1 <= 2e+153) tmp = sqrt(t_0); else tmp = Float64(y * sqrt(Float64(x * 9.0))); end return tmp end
function tmp_2 = code(x, y) t_0 = 1.0 / (x * 9.0); t_1 = (sqrt(x) * 3.0) * (-1.0 + (y + t_0)); tmp = 0.0; if (t_1 <= -5e+159) tmp = 3.0 * (y * sqrt(x)); elseif (t_1 <= -5.0) tmp = sqrt(x) * -3.0; elseif (t_1 <= 2e+153) tmp = sqrt(t_0); else tmp = y * sqrt((x * 9.0)); end tmp_2 = tmp; end
code[x_, y_] := Block[{t$95$0 = N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[Sqrt[x], $MachinePrecision] * 3.0), $MachinePrecision] * N[(-1.0 + N[(y + t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -5e+159], N[(3.0 * N[(y * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, -5.0], N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision], If[LessEqual[t$95$1, 2e+153], N[Sqrt[t$95$0], $MachinePrecision], N[(y * N[Sqrt[N[(x * 9.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{1}{x \cdot 9}\\
t_1 := \left(\sqrt{x} \cdot 3\right) \cdot \left(-1 + \left(y + t\_0\right)\right)\\
\mathbf{if}\;t\_1 \leq -5 \cdot 10^{+159}:\\
\;\;\;\;3 \cdot \left(y \cdot \sqrt{x}\right)\\
\mathbf{elif}\;t\_1 \leq -5:\\
\;\;\;\;\sqrt{x} \cdot -3\\
\mathbf{elif}\;t\_1 \leq 2 \cdot 10^{+153}:\\
\;\;\;\;\sqrt{t\_0}\\
\mathbf{else}:\\
\;\;\;\;y \cdot \sqrt{x \cdot 9}\\
\end{array}
\end{array}
if (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -5.00000000000000003e159Initial program 99.0%
*-commutative99.0%
associate-*l*99.4%
associate--l+99.4%
distribute-lft-in99.4%
fma-define99.5%
sub-neg99.5%
+-commutative99.5%
distribute-lft-in99.5%
metadata-eval99.5%
metadata-eval99.5%
*-commutative99.5%
associate-/r*99.5%
associate-*r/99.5%
metadata-eval99.5%
metadata-eval99.5%
Simplified99.5%
Taylor expanded in y around inf 99.5%
if -5.00000000000000003e159 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -5Initial program 99.6%
*-commutative99.6%
associate-*l*99.5%
associate--l+99.5%
distribute-lft-in99.5%
fma-define99.5%
sub-neg99.5%
+-commutative99.5%
distribute-lft-in99.4%
metadata-eval99.4%
metadata-eval99.4%
*-commutative99.4%
associate-/r*99.4%
associate-*r/99.4%
metadata-eval99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in y around 0 78.4%
sub-neg78.4%
metadata-eval78.4%
associate-*r/78.4%
metadata-eval78.4%
+-commutative78.4%
metadata-eval78.4%
distribute-neg-frac78.4%
unsub-neg78.4%
Simplified78.4%
Taylor expanded in x around inf 76.5%
*-commutative76.5%
Simplified76.5%
if -5 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < 2e153Initial program 99.2%
*-commutative99.2%
associate-*l*99.3%
associate--l+99.3%
distribute-lft-in99.2%
fma-define99.2%
sub-neg99.2%
+-commutative99.2%
distribute-lft-in99.2%
metadata-eval99.2%
metadata-eval99.2%
*-commutative99.2%
associate-/r*99.2%
associate-*r/99.3%
metadata-eval99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 81.2%
metadata-eval81.2%
sqrt-prod81.4%
div-inv81.5%
pow1/281.5%
Applied egg-rr81.5%
unpow1/281.5%
Simplified81.5%
clear-num81.4%
frac-2neg81.4%
metadata-eval81.4%
distribute-frac-neg281.4%
div-inv81.5%
metadata-eval81.5%
Applied egg-rr81.5%
distribute-neg-frac81.5%
metadata-eval81.5%
Applied egg-rr81.5%
if 2e153 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) Initial program 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%
*-commutative99.6%
metadata-eval99.6%
sqrt-prod99.8%
pow1/299.8%
Applied egg-rr99.8%
unpow1/299.8%
Simplified99.8%
Taylor expanded in y around inf 99.8%
Final simplification83.2%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* 3.0 (* y (sqrt x))))
(t_1 (/ 1.0 (* x 9.0)))
(t_2 (* (* (sqrt x) 3.0) (+ -1.0 (+ y t_1)))))
(if (<= t_2 -5e+159)
t_0
(if (<= t_2 -5.0)
(* (sqrt x) -3.0)
(if (<= t_2 2e+153) (sqrt t_1) t_0)))))
double code(double x, double y) {
double t_0 = 3.0 * (y * sqrt(x));
double t_1 = 1.0 / (x * 9.0);
double t_2 = (sqrt(x) * 3.0) * (-1.0 + (y + t_1));
double tmp;
if (t_2 <= -5e+159) {
tmp = t_0;
} else if (t_2 <= -5.0) {
tmp = sqrt(x) * -3.0;
} else if (t_2 <= 2e+153) {
tmp = sqrt(t_1);
} else {
tmp = t_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) :: t_1
real(8) :: t_2
real(8) :: tmp
t_0 = 3.0d0 * (y * sqrt(x))
t_1 = 1.0d0 / (x * 9.0d0)
t_2 = (sqrt(x) * 3.0d0) * ((-1.0d0) + (y + t_1))
if (t_2 <= (-5d+159)) then
tmp = t_0
else if (t_2 <= (-5.0d0)) then
tmp = sqrt(x) * (-3.0d0)
else if (t_2 <= 2d+153) then
tmp = sqrt(t_1)
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y) {
double t_0 = 3.0 * (y * Math.sqrt(x));
double t_1 = 1.0 / (x * 9.0);
double t_2 = (Math.sqrt(x) * 3.0) * (-1.0 + (y + t_1));
double tmp;
if (t_2 <= -5e+159) {
tmp = t_0;
} else if (t_2 <= -5.0) {
tmp = Math.sqrt(x) * -3.0;
} else if (t_2 <= 2e+153) {
tmp = Math.sqrt(t_1);
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y): t_0 = 3.0 * (y * math.sqrt(x)) t_1 = 1.0 / (x * 9.0) t_2 = (math.sqrt(x) * 3.0) * (-1.0 + (y + t_1)) tmp = 0 if t_2 <= -5e+159: tmp = t_0 elif t_2 <= -5.0: tmp = math.sqrt(x) * -3.0 elif t_2 <= 2e+153: tmp = math.sqrt(t_1) else: tmp = t_0 return tmp
function code(x, y) t_0 = Float64(3.0 * Float64(y * sqrt(x))) t_1 = Float64(1.0 / Float64(x * 9.0)) t_2 = Float64(Float64(sqrt(x) * 3.0) * Float64(-1.0 + Float64(y + t_1))) tmp = 0.0 if (t_2 <= -5e+159) tmp = t_0; elseif (t_2 <= -5.0) tmp = Float64(sqrt(x) * -3.0); elseif (t_2 <= 2e+153) tmp = sqrt(t_1); else tmp = t_0; end return tmp end
function tmp_2 = code(x, y) t_0 = 3.0 * (y * sqrt(x)); t_1 = 1.0 / (x * 9.0); t_2 = (sqrt(x) * 3.0) * (-1.0 + (y + t_1)); tmp = 0.0; if (t_2 <= -5e+159) tmp = t_0; elseif (t_2 <= -5.0) tmp = sqrt(x) * -3.0; elseif (t_2 <= 2e+153) tmp = sqrt(t_1); else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_] := Block[{t$95$0 = N[(3.0 * N[(y * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(N[Sqrt[x], $MachinePrecision] * 3.0), $MachinePrecision] * N[(-1.0 + N[(y + t$95$1), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$2, -5e+159], t$95$0, If[LessEqual[t$95$2, -5.0], N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision], If[LessEqual[t$95$2, 2e+153], N[Sqrt[t$95$1], $MachinePrecision], t$95$0]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 3 \cdot \left(y \cdot \sqrt{x}\right)\\
t_1 := \frac{1}{x \cdot 9}\\
t_2 := \left(\sqrt{x} \cdot 3\right) \cdot \left(-1 + \left(y + t\_1\right)\right)\\
\mathbf{if}\;t\_2 \leq -5 \cdot 10^{+159}:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;t\_2 \leq -5:\\
\;\;\;\;\sqrt{x} \cdot -3\\
\mathbf{elif}\;t\_2 \leq 2 \cdot 10^{+153}:\\
\;\;\;\;\sqrt{t\_1}\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -5.00000000000000003e159 or 2e153 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) Initial program 99.3%
*-commutative99.3%
associate-*l*99.4%
associate--l+99.4%
distribute-lft-in99.4%
fma-define99.4%
sub-neg99.4%
+-commutative99.4%
distribute-lft-in99.4%
metadata-eval99.4%
metadata-eval99.4%
*-commutative99.4%
associate-/r*99.4%
associate-*r/99.4%
metadata-eval99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in y around inf 99.6%
if -5.00000000000000003e159 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -5Initial program 99.6%
*-commutative99.6%
associate-*l*99.5%
associate--l+99.5%
distribute-lft-in99.5%
fma-define99.5%
sub-neg99.5%
+-commutative99.5%
distribute-lft-in99.4%
metadata-eval99.4%
metadata-eval99.4%
*-commutative99.4%
associate-/r*99.4%
associate-*r/99.4%
metadata-eval99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in y around 0 78.4%
sub-neg78.4%
metadata-eval78.4%
associate-*r/78.4%
metadata-eval78.4%
+-commutative78.4%
metadata-eval78.4%
distribute-neg-frac78.4%
unsub-neg78.4%
Simplified78.4%
Taylor expanded in x around inf 76.5%
*-commutative76.5%
Simplified76.5%
if -5 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < 2e153Initial program 99.2%
*-commutative99.2%
associate-*l*99.3%
associate--l+99.3%
distribute-lft-in99.2%
fma-define99.2%
sub-neg99.2%
+-commutative99.2%
distribute-lft-in99.2%
metadata-eval99.2%
metadata-eval99.2%
*-commutative99.2%
associate-/r*99.2%
associate-*r/99.3%
metadata-eval99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 81.2%
metadata-eval81.2%
sqrt-prod81.4%
div-inv81.5%
pow1/281.5%
Applied egg-rr81.5%
unpow1/281.5%
Simplified81.5%
clear-num81.4%
frac-2neg81.4%
metadata-eval81.4%
distribute-frac-neg281.4%
div-inv81.5%
metadata-eval81.5%
Applied egg-rr81.5%
distribute-neg-frac81.5%
metadata-eval81.5%
Applied egg-rr81.5%
Final simplification83.2%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* (* (sqrt x) 3.0) (+ -1.0 (+ y (/ 1.0 (* x 9.0))))))
(t_1 (sqrt (* x 9.0))))
(if (<= t_0 -1e+18)
(* 3.0 (* (+ y -1.0) (sqrt x)))
(if (<= t_0 1e+150)
(* t_1 (+ (/ 0.1111111111111111 x) -1.0))
(* y t_1)))))
double code(double x, double y) {
double t_0 = (sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0))));
double t_1 = sqrt((x * 9.0));
double tmp;
if (t_0 <= -1e+18) {
tmp = 3.0 * ((y + -1.0) * sqrt(x));
} else if (t_0 <= 1e+150) {
tmp = t_1 * ((0.1111111111111111 / x) + -1.0);
} else {
tmp = y * 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) :: tmp
t_0 = (sqrt(x) * 3.0d0) * ((-1.0d0) + (y + (1.0d0 / (x * 9.0d0))))
t_1 = sqrt((x * 9.0d0))
if (t_0 <= (-1d+18)) then
tmp = 3.0d0 * ((y + (-1.0d0)) * sqrt(x))
else if (t_0 <= 1d+150) then
tmp = t_1 * ((0.1111111111111111d0 / x) + (-1.0d0))
else
tmp = y * t_1
end if
code = tmp
end function
public static double code(double x, double y) {
double t_0 = (Math.sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0))));
double t_1 = Math.sqrt((x * 9.0));
double tmp;
if (t_0 <= -1e+18) {
tmp = 3.0 * ((y + -1.0) * Math.sqrt(x));
} else if (t_0 <= 1e+150) {
tmp = t_1 * ((0.1111111111111111 / x) + -1.0);
} else {
tmp = y * t_1;
}
return tmp;
}
def code(x, y): t_0 = (math.sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0)))) t_1 = math.sqrt((x * 9.0)) tmp = 0 if t_0 <= -1e+18: tmp = 3.0 * ((y + -1.0) * math.sqrt(x)) elif t_0 <= 1e+150: tmp = t_1 * ((0.1111111111111111 / x) + -1.0) else: tmp = y * t_1 return tmp
function code(x, y) t_0 = Float64(Float64(sqrt(x) * 3.0) * Float64(-1.0 + Float64(y + Float64(1.0 / Float64(x * 9.0))))) t_1 = sqrt(Float64(x * 9.0)) tmp = 0.0 if (t_0 <= -1e+18) tmp = Float64(3.0 * Float64(Float64(y + -1.0) * sqrt(x))); elseif (t_0 <= 1e+150) tmp = Float64(t_1 * Float64(Float64(0.1111111111111111 / x) + -1.0)); else tmp = Float64(y * t_1); end return tmp end
function tmp_2 = code(x, y) t_0 = (sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0)))); t_1 = sqrt((x * 9.0)); tmp = 0.0; if (t_0 <= -1e+18) tmp = 3.0 * ((y + -1.0) * sqrt(x)); elseif (t_0 <= 1e+150) tmp = t_1 * ((0.1111111111111111 / x) + -1.0); else tmp = y * t_1; end tmp_2 = tmp; end
code[x_, y_] := Block[{t$95$0 = N[(N[(N[Sqrt[x], $MachinePrecision] * 3.0), $MachinePrecision] * N[(-1.0 + N[(y + N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[Sqrt[N[(x * 9.0), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$0, -1e+18], N[(3.0 * N[(N[(y + -1.0), $MachinePrecision] * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 1e+150], N[(t$95$1 * N[(N[(0.1111111111111111 / x), $MachinePrecision] + -1.0), $MachinePrecision]), $MachinePrecision], N[(y * t$95$1), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(\sqrt{x} \cdot 3\right) \cdot \left(-1 + \left(y + \frac{1}{x \cdot 9}\right)\right)\\
t_1 := \sqrt{x \cdot 9}\\
\mathbf{if}\;t\_0 \leq -1 \cdot 10^{+18}:\\
\;\;\;\;3 \cdot \left(\left(y + -1\right) \cdot \sqrt{x}\right)\\
\mathbf{elif}\;t\_0 \leq 10^{+150}:\\
\;\;\;\;t\_1 \cdot \left(\frac{0.1111111111111111}{x} + -1\right)\\
\mathbf{else}:\\
\;\;\;\;y \cdot t\_1\\
\end{array}
\end{array}
if (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -1e18Initial program 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 98.9%
if -1e18 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < 9.99999999999999981e149Initial program 99.3%
+-commutative99.3%
associate--l+99.3%
*-commutative99.3%
associate-/r*99.2%
metadata-eval99.2%
sub-neg99.2%
metadata-eval99.2%
Simplified99.2%
*-commutative99.2%
metadata-eval99.2%
sqrt-prod99.4%
pow1/299.4%
Applied egg-rr99.4%
unpow1/299.4%
Simplified99.4%
Taylor expanded in y around 0 85.8%
sub-neg85.8%
associate-*r/85.8%
metadata-eval85.8%
metadata-eval85.8%
+-commutative85.8%
Simplified85.8%
if 9.99999999999999981e149 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) Initial program 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%
*-commutative99.7%
metadata-eval99.7%
sqrt-prod99.8%
pow1/299.8%
Applied egg-rr99.8%
unpow1/299.8%
Simplified99.8%
Taylor expanded in y around inf 89.5%
Final simplification92.3%
(FPCore (x y)
:precision binary64
(let* ((t_0 (* (* (sqrt x) 3.0) (+ -1.0 (+ y (/ 1.0 (* x 9.0)))))))
(if (<= t_0 -1e+18)
(* 3.0 (* (+ y -1.0) (sqrt x)))
(if (<= t_0 1e+150)
(* (sqrt x) (- -3.0 (/ -0.3333333333333333 x)))
(* y (sqrt (* x 9.0)))))))
double code(double x, double y) {
double t_0 = (sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0))));
double tmp;
if (t_0 <= -1e+18) {
tmp = 3.0 * ((y + -1.0) * sqrt(x));
} else if (t_0 <= 1e+150) {
tmp = sqrt(x) * (-3.0 - (-0.3333333333333333 / x));
} else {
tmp = y * sqrt((x * 9.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) * 3.0d0) * ((-1.0d0) + (y + (1.0d0 / (x * 9.0d0))))
if (t_0 <= (-1d+18)) then
tmp = 3.0d0 * ((y + (-1.0d0)) * sqrt(x))
else if (t_0 <= 1d+150) then
tmp = sqrt(x) * ((-3.0d0) - ((-0.3333333333333333d0) / x))
else
tmp = y * sqrt((x * 9.0d0))
end if
code = tmp
end function
public static double code(double x, double y) {
double t_0 = (Math.sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0))));
double tmp;
if (t_0 <= -1e+18) {
tmp = 3.0 * ((y + -1.0) * Math.sqrt(x));
} else if (t_0 <= 1e+150) {
tmp = Math.sqrt(x) * (-3.0 - (-0.3333333333333333 / x));
} else {
tmp = y * Math.sqrt((x * 9.0));
}
return tmp;
}
def code(x, y): t_0 = (math.sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0)))) tmp = 0 if t_0 <= -1e+18: tmp = 3.0 * ((y + -1.0) * math.sqrt(x)) elif t_0 <= 1e+150: tmp = math.sqrt(x) * (-3.0 - (-0.3333333333333333 / x)) else: tmp = y * math.sqrt((x * 9.0)) return tmp
function code(x, y) t_0 = Float64(Float64(sqrt(x) * 3.0) * Float64(-1.0 + Float64(y + Float64(1.0 / Float64(x * 9.0))))) tmp = 0.0 if (t_0 <= -1e+18) tmp = Float64(3.0 * Float64(Float64(y + -1.0) * sqrt(x))); elseif (t_0 <= 1e+150) tmp = Float64(sqrt(x) * Float64(-3.0 - Float64(-0.3333333333333333 / x))); else tmp = Float64(y * sqrt(Float64(x * 9.0))); end return tmp end
function tmp_2 = code(x, y) t_0 = (sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0)))); tmp = 0.0; if (t_0 <= -1e+18) tmp = 3.0 * ((y + -1.0) * sqrt(x)); elseif (t_0 <= 1e+150) tmp = sqrt(x) * (-3.0 - (-0.3333333333333333 / x)); else tmp = y * sqrt((x * 9.0)); end tmp_2 = tmp; end
code[x_, y_] := Block[{t$95$0 = N[(N[(N[Sqrt[x], $MachinePrecision] * 3.0), $MachinePrecision] * N[(-1.0 + N[(y + N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -1e+18], N[(3.0 * N[(N[(y + -1.0), $MachinePrecision] * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 1e+150], N[(N[Sqrt[x], $MachinePrecision] * N[(-3.0 - N[(-0.3333333333333333 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(y * N[Sqrt[N[(x * 9.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(\sqrt{x} \cdot 3\right) \cdot \left(-1 + \left(y + \frac{1}{x \cdot 9}\right)\right)\\
\mathbf{if}\;t\_0 \leq -1 \cdot 10^{+18}:\\
\;\;\;\;3 \cdot \left(\left(y + -1\right) \cdot \sqrt{x}\right)\\
\mathbf{elif}\;t\_0 \leq 10^{+150}:\\
\;\;\;\;\sqrt{x} \cdot \left(-3 - \frac{-0.3333333333333333}{x}\right)\\
\mathbf{else}:\\
\;\;\;\;y \cdot \sqrt{x \cdot 9}\\
\end{array}
\end{array}
if (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -1e18Initial program 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 98.9%
if -1e18 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < 9.99999999999999981e149Initial program 99.3%
*-commutative99.3%
associate-*l*99.3%
associate--l+99.3%
distribute-lft-in99.2%
fma-define99.2%
sub-neg99.2%
+-commutative99.2%
distribute-lft-in99.2%
metadata-eval99.2%
metadata-eval99.2%
*-commutative99.2%
associate-/r*99.2%
associate-*r/99.3%
metadata-eval99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in y around 0 85.7%
sub-neg85.7%
metadata-eval85.7%
associate-*r/85.7%
metadata-eval85.7%
+-commutative85.7%
metadata-eval85.7%
distribute-neg-frac85.7%
unsub-neg85.7%
Simplified85.7%
if 9.99999999999999981e149 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) Initial program 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%
*-commutative99.7%
metadata-eval99.7%
sqrt-prod99.8%
pow1/299.8%
Applied egg-rr99.8%
unpow1/299.8%
Simplified99.8%
Taylor expanded in y around inf 89.5%
Final simplification92.3%
(FPCore (x y)
:precision binary64
(let* ((t_0 (/ 1.0 (* x 9.0))) (t_1 (* (* (sqrt x) 3.0) (+ -1.0 (+ y t_0)))))
(if (<= t_1 -5.0)
(* 3.0 (* (+ y -1.0) (sqrt x)))
(if (<= t_1 2e+153) (sqrt t_0) (* y (sqrt (* x 9.0)))))))
double code(double x, double y) {
double t_0 = 1.0 / (x * 9.0);
double t_1 = (sqrt(x) * 3.0) * (-1.0 + (y + t_0));
double tmp;
if (t_1 <= -5.0) {
tmp = 3.0 * ((y + -1.0) * sqrt(x));
} else if (t_1 <= 2e+153) {
tmp = sqrt(t_0);
} else {
tmp = y * sqrt((x * 9.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) :: t_1
real(8) :: tmp
t_0 = 1.0d0 / (x * 9.0d0)
t_1 = (sqrt(x) * 3.0d0) * ((-1.0d0) + (y + t_0))
if (t_1 <= (-5.0d0)) then
tmp = 3.0d0 * ((y + (-1.0d0)) * sqrt(x))
else if (t_1 <= 2d+153) then
tmp = sqrt(t_0)
else
tmp = y * sqrt((x * 9.0d0))
end if
code = tmp
end function
public static double code(double x, double y) {
double t_0 = 1.0 / (x * 9.0);
double t_1 = (Math.sqrt(x) * 3.0) * (-1.0 + (y + t_0));
double tmp;
if (t_1 <= -5.0) {
tmp = 3.0 * ((y + -1.0) * Math.sqrt(x));
} else if (t_1 <= 2e+153) {
tmp = Math.sqrt(t_0);
} else {
tmp = y * Math.sqrt((x * 9.0));
}
return tmp;
}
def code(x, y): t_0 = 1.0 / (x * 9.0) t_1 = (math.sqrt(x) * 3.0) * (-1.0 + (y + t_0)) tmp = 0 if t_1 <= -5.0: tmp = 3.0 * ((y + -1.0) * math.sqrt(x)) elif t_1 <= 2e+153: tmp = math.sqrt(t_0) else: tmp = y * math.sqrt((x * 9.0)) return tmp
function code(x, y) t_0 = Float64(1.0 / Float64(x * 9.0)) t_1 = Float64(Float64(sqrt(x) * 3.0) * Float64(-1.0 + Float64(y + t_0))) tmp = 0.0 if (t_1 <= -5.0) tmp = Float64(3.0 * Float64(Float64(y + -1.0) * sqrt(x))); elseif (t_1 <= 2e+153) tmp = sqrt(t_0); else tmp = Float64(y * sqrt(Float64(x * 9.0))); end return tmp end
function tmp_2 = code(x, y) t_0 = 1.0 / (x * 9.0); t_1 = (sqrt(x) * 3.0) * (-1.0 + (y + t_0)); tmp = 0.0; if (t_1 <= -5.0) tmp = 3.0 * ((y + -1.0) * sqrt(x)); elseif (t_1 <= 2e+153) tmp = sqrt(t_0); else tmp = y * sqrt((x * 9.0)); end tmp_2 = tmp; end
code[x_, y_] := Block[{t$95$0 = N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[Sqrt[x], $MachinePrecision] * 3.0), $MachinePrecision] * N[(-1.0 + N[(y + t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -5.0], N[(3.0 * N[(N[(y + -1.0), $MachinePrecision] * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 2e+153], N[Sqrt[t$95$0], $MachinePrecision], N[(y * N[Sqrt[N[(x * 9.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{1}{x \cdot 9}\\
t_1 := \left(\sqrt{x} \cdot 3\right) \cdot \left(-1 + \left(y + t\_0\right)\right)\\
\mathbf{if}\;t\_1 \leq -5:\\
\;\;\;\;3 \cdot \left(\left(y + -1\right) \cdot \sqrt{x}\right)\\
\mathbf{elif}\;t\_1 \leq 2 \cdot 10^{+153}:\\
\;\;\;\;\sqrt{t\_0}\\
\mathbf{else}:\\
\;\;\;\;y \cdot \sqrt{x \cdot 9}\\
\end{array}
\end{array}
if (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -5Initial program 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 97.3%
if -5 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < 2e153Initial program 99.2%
*-commutative99.2%
associate-*l*99.3%
associate--l+99.3%
distribute-lft-in99.2%
fma-define99.2%
sub-neg99.2%
+-commutative99.2%
distribute-lft-in99.2%
metadata-eval99.2%
metadata-eval99.2%
*-commutative99.2%
associate-/r*99.2%
associate-*r/99.3%
metadata-eval99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 81.2%
metadata-eval81.2%
sqrt-prod81.4%
div-inv81.5%
pow1/281.5%
Applied egg-rr81.5%
unpow1/281.5%
Simplified81.5%
clear-num81.4%
frac-2neg81.4%
metadata-eval81.4%
distribute-frac-neg281.4%
div-inv81.5%
metadata-eval81.5%
Applied egg-rr81.5%
distribute-neg-frac81.5%
metadata-eval81.5%
Applied egg-rr81.5%
if 2e153 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) Initial program 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%
*-commutative99.6%
metadata-eval99.6%
sqrt-prod99.8%
pow1/299.8%
Applied egg-rr99.8%
unpow1/299.8%
Simplified99.8%
Taylor expanded in y around inf 99.8%
Final simplification91.0%
(FPCore (x y)
:precision binary64
(let* ((t_0 (/ 1.0 (* x 9.0))))
(if (<= (* (* (sqrt x) 3.0) (+ -1.0 (+ y t_0))) -5.0)
(* (sqrt x) -3.0)
(sqrt t_0))))
double code(double x, double y) {
double t_0 = 1.0 / (x * 9.0);
double tmp;
if (((sqrt(x) * 3.0) * (-1.0 + (y + t_0))) <= -5.0) {
tmp = sqrt(x) * -3.0;
} else {
tmp = sqrt(t_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 = 1.0d0 / (x * 9.0d0)
if (((sqrt(x) * 3.0d0) * ((-1.0d0) + (y + t_0))) <= (-5.0d0)) then
tmp = sqrt(x) * (-3.0d0)
else
tmp = sqrt(t_0)
end if
code = tmp
end function
public static double code(double x, double y) {
double t_0 = 1.0 / (x * 9.0);
double tmp;
if (((Math.sqrt(x) * 3.0) * (-1.0 + (y + t_0))) <= -5.0) {
tmp = Math.sqrt(x) * -3.0;
} else {
tmp = Math.sqrt(t_0);
}
return tmp;
}
def code(x, y): t_0 = 1.0 / (x * 9.0) tmp = 0 if ((math.sqrt(x) * 3.0) * (-1.0 + (y + t_0))) <= -5.0: tmp = math.sqrt(x) * -3.0 else: tmp = math.sqrt(t_0) return tmp
function code(x, y) t_0 = Float64(1.0 / Float64(x * 9.0)) tmp = 0.0 if (Float64(Float64(sqrt(x) * 3.0) * Float64(-1.0 + Float64(y + t_0))) <= -5.0) tmp = Float64(sqrt(x) * -3.0); else tmp = sqrt(t_0); end return tmp end
function tmp_2 = code(x, y) t_0 = 1.0 / (x * 9.0); tmp = 0.0; if (((sqrt(x) * 3.0) * (-1.0 + (y + t_0))) <= -5.0) tmp = sqrt(x) * -3.0; else tmp = sqrt(t_0); end tmp_2 = tmp; end
code[x_, y_] := Block[{t$95$0 = N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[Sqrt[x], $MachinePrecision] * 3.0), $MachinePrecision] * N[(-1.0 + N[(y + t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], -5.0], N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision], N[Sqrt[t$95$0], $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{1}{x \cdot 9}\\
\mathbf{if}\;\left(\sqrt{x} \cdot 3\right) \cdot \left(-1 + \left(y + t\_0\right)\right) \leq -5:\\
\;\;\;\;\sqrt{x} \cdot -3\\
\mathbf{else}:\\
\;\;\;\;\sqrt{t\_0}\\
\end{array}
\end{array}
if (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -5Initial program 99.4%
*-commutative99.4%
associate-*l*99.5%
associate--l+99.5%
distribute-lft-in99.5%
fma-define99.5%
sub-neg99.5%
+-commutative99.5%
distribute-lft-in99.5%
metadata-eval99.5%
metadata-eval99.5%
*-commutative99.5%
associate-/r*99.5%
associate-*r/99.5%
metadata-eval99.5%
metadata-eval99.5%
Simplified99.5%
Taylor expanded in y around 0 61.5%
sub-neg61.5%
metadata-eval61.5%
associate-*r/61.5%
metadata-eval61.5%
+-commutative61.5%
metadata-eval61.5%
distribute-neg-frac61.5%
unsub-neg61.5%
Simplified61.5%
Taylor expanded in x around inf 60.2%
*-commutative60.2%
Simplified60.2%
if -5 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) Initial program 99.3%
*-commutative99.3%
associate-*l*99.3%
associate--l+99.3%
distribute-lft-in99.3%
fma-define99.3%
sub-neg99.3%
+-commutative99.3%
distribute-lft-in99.3%
metadata-eval99.3%
metadata-eval99.3%
*-commutative99.3%
associate-/r*99.2%
associate-*r/99.3%
metadata-eval99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 67.9%
metadata-eval67.9%
sqrt-prod68.1%
div-inv68.1%
pow1/268.1%
Applied egg-rr68.1%
unpow1/268.1%
Simplified68.1%
clear-num68.0%
frac-2neg68.0%
metadata-eval68.0%
distribute-frac-neg268.0%
div-inv68.2%
metadata-eval68.2%
Applied egg-rr68.2%
distribute-neg-frac68.2%
metadata-eval68.2%
Applied egg-rr68.2%
Final simplification64.2%
(FPCore (x y) :precision binary64 (if (<= (* (* (sqrt x) 3.0) (+ -1.0 (+ y (/ 1.0 (* x 9.0))))) -5.0) (* (sqrt x) -3.0) (sqrt (/ 0.1111111111111111 x))))
double code(double x, double y) {
double tmp;
if (((sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0))))) <= -5.0) {
tmp = sqrt(x) * -3.0;
} else {
tmp = sqrt((0.1111111111111111 / x));
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (((sqrt(x) * 3.0d0) * ((-1.0d0) + (y + (1.0d0 / (x * 9.0d0))))) <= (-5.0d0)) then
tmp = sqrt(x) * (-3.0d0)
else
tmp = sqrt((0.1111111111111111d0 / x))
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (((Math.sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0))))) <= -5.0) {
tmp = Math.sqrt(x) * -3.0;
} else {
tmp = Math.sqrt((0.1111111111111111 / x));
}
return tmp;
}
def code(x, y): tmp = 0 if ((math.sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0))))) <= -5.0: tmp = math.sqrt(x) * -3.0 else: tmp = math.sqrt((0.1111111111111111 / x)) return tmp
function code(x, y) tmp = 0.0 if (Float64(Float64(sqrt(x) * 3.0) * Float64(-1.0 + Float64(y + Float64(1.0 / Float64(x * 9.0))))) <= -5.0) tmp = Float64(sqrt(x) * -3.0); else tmp = sqrt(Float64(0.1111111111111111 / x)); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (((sqrt(x) * 3.0) * (-1.0 + (y + (1.0 / (x * 9.0))))) <= -5.0) tmp = sqrt(x) * -3.0; else tmp = sqrt((0.1111111111111111 / x)); end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[N[(N[(N[Sqrt[x], $MachinePrecision] * 3.0), $MachinePrecision] * N[(-1.0 + N[(y + N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], -5.0], N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision], N[Sqrt[N[(0.1111111111111111 / x), $MachinePrecision]], $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\left(\sqrt{x} \cdot 3\right) \cdot \left(-1 + \left(y + \frac{1}{x \cdot 9}\right)\right) \leq -5:\\
\;\;\;\;\sqrt{x} \cdot -3\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\frac{0.1111111111111111}{x}}\\
\end{array}
\end{array}
if (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) < -5Initial program 99.4%
*-commutative99.4%
associate-*l*99.5%
associate--l+99.5%
distribute-lft-in99.5%
fma-define99.5%
sub-neg99.5%
+-commutative99.5%
distribute-lft-in99.5%
metadata-eval99.5%
metadata-eval99.5%
*-commutative99.5%
associate-/r*99.5%
associate-*r/99.5%
metadata-eval99.5%
metadata-eval99.5%
Simplified99.5%
Taylor expanded in y around 0 61.5%
sub-neg61.5%
metadata-eval61.5%
associate-*r/61.5%
metadata-eval61.5%
+-commutative61.5%
metadata-eval61.5%
distribute-neg-frac61.5%
unsub-neg61.5%
Simplified61.5%
Taylor expanded in x around inf 60.2%
*-commutative60.2%
Simplified60.2%
if -5 < (*.f64 (*.f64 #s(literal 3 binary64) (sqrt.f64 x)) (-.f64 (+.f64 y (/.f64 #s(literal 1 binary64) (*.f64 x #s(literal 9 binary64)))) #s(literal 1 binary64))) Initial program 99.3%
*-commutative99.3%
associate-*l*99.3%
associate--l+99.3%
distribute-lft-in99.3%
fma-define99.3%
sub-neg99.3%
+-commutative99.3%
distribute-lft-in99.3%
metadata-eval99.3%
metadata-eval99.3%
*-commutative99.3%
associate-/r*99.2%
associate-*r/99.3%
metadata-eval99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 67.9%
metadata-eval67.9%
sqrt-prod68.1%
div-inv68.1%
pow1/268.1%
Applied egg-rr68.1%
unpow1/268.1%
Simplified68.1%
Final simplification64.1%
(FPCore (x y) :precision binary64 (* (sqrt x) (+ (+ (* y 3.0) (/ 0.3333333333333333 x)) -3.0)))
double code(double x, double y) {
return sqrt(x) * (((y * 3.0) + (0.3333333333333333 / x)) + -3.0);
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = sqrt(x) * (((y * 3.0d0) + (0.3333333333333333d0 / x)) + (-3.0d0))
end function
public static double code(double x, double y) {
return Math.sqrt(x) * (((y * 3.0) + (0.3333333333333333 / x)) + -3.0);
}
def code(x, y): return math.sqrt(x) * (((y * 3.0) + (0.3333333333333333 / x)) + -3.0)
function code(x, y) return Float64(sqrt(x) * Float64(Float64(Float64(y * 3.0) + Float64(0.3333333333333333 / x)) + -3.0)) end
function tmp = code(x, y) tmp = sqrt(x) * (((y * 3.0) + (0.3333333333333333 / x)) + -3.0); end
code[x_, y_] := N[(N[Sqrt[x], $MachinePrecision] * N[(N[(N[(y * 3.0), $MachinePrecision] + N[(0.3333333333333333 / x), $MachinePrecision]), $MachinePrecision] + -3.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\sqrt{x} \cdot \left(\left(y \cdot 3 + \frac{0.3333333333333333}{x}\right) + -3\right)
\end{array}
Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
associate--l+99.4%
distribute-lft-in99.4%
fma-define99.4%
sub-neg99.4%
+-commutative99.4%
distribute-lft-in99.4%
metadata-eval99.4%
metadata-eval99.4%
*-commutative99.4%
associate-/r*99.3%
associate-*r/99.4%
metadata-eval99.4%
metadata-eval99.4%
Simplified99.4%
fma-undefine99.4%
+-commutative99.4%
associate-+r+99.4%
Applied egg-rr99.4%
Final simplification99.4%
(FPCore (x y) :precision binary64 (sqrt (/ 0.1111111111111111 x)))
double code(double x, double y) {
return sqrt((0.1111111111111111 / x));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = sqrt((0.1111111111111111d0 / x))
end function
public static double code(double x, double y) {
return Math.sqrt((0.1111111111111111 / x));
}
def code(x, y): return math.sqrt((0.1111111111111111 / x))
function code(x, y) return sqrt(Float64(0.1111111111111111 / x)) end
function tmp = code(x, y) tmp = sqrt((0.1111111111111111 / x)); end
code[x_, y_] := N[Sqrt[N[(0.1111111111111111 / x), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
\sqrt{\frac{0.1111111111111111}{x}}
\end{array}
Initial program 99.4%
*-commutative99.4%
associate-*l*99.4%
associate--l+99.4%
distribute-lft-in99.4%
fma-define99.4%
sub-neg99.4%
+-commutative99.4%
distribute-lft-in99.4%
metadata-eval99.4%
metadata-eval99.4%
*-commutative99.4%
associate-/r*99.3%
associate-*r/99.4%
metadata-eval99.4%
metadata-eval99.4%
Simplified99.4%
Taylor expanded in x around 0 34.6%
metadata-eval34.6%
sqrt-prod34.7%
div-inv34.7%
pow1/234.7%
Applied egg-rr34.7%
unpow1/234.7%
Simplified34.7%
(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 2024191
(FPCore (x y)
:name "Numeric.SpecFunctions:incompleteGamma from math-functions-0.1.5.2, B"
:precision binary64
:alt
(! :herbie-platform default (* 3 (+ (* y (sqrt x)) (* (- (/ 1 (* x 9)) 1) (sqrt x)))))
(* (* 3.0 (sqrt x)) (- (+ y (/ 1.0 (* x 9.0))) 1.0)))