
(FPCore (x) :precision binary64 (- (/ 1.0 (sqrt x)) (/ 1.0 (sqrt (+ x 1.0)))))
double code(double x) {
return (1.0 / sqrt(x)) - (1.0 / sqrt((x + 1.0)));
}
real(8) function code(x)
real(8), intent (in) :: x
code = (1.0d0 / sqrt(x)) - (1.0d0 / sqrt((x + 1.0d0)))
end function
public static double code(double x) {
return (1.0 / Math.sqrt(x)) - (1.0 / Math.sqrt((x + 1.0)));
}
def code(x): return (1.0 / math.sqrt(x)) - (1.0 / math.sqrt((x + 1.0)))
function code(x) return Float64(Float64(1.0 / sqrt(x)) - Float64(1.0 / sqrt(Float64(x + 1.0)))) end
function tmp = code(x) tmp = (1.0 / sqrt(x)) - (1.0 / sqrt((x + 1.0))); end
code[x_] := N[(N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision] - N[(1.0 / N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{\sqrt{x}} - \frac{1}{\sqrt{x + 1}}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 11 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (- (/ 1.0 (sqrt x)) (/ 1.0 (sqrt (+ x 1.0)))))
double code(double x) {
return (1.0 / sqrt(x)) - (1.0 / sqrt((x + 1.0)));
}
real(8) function code(x)
real(8), intent (in) :: x
code = (1.0d0 / sqrt(x)) - (1.0d0 / sqrt((x + 1.0d0)))
end function
public static double code(double x) {
return (1.0 / Math.sqrt(x)) - (1.0 / Math.sqrt((x + 1.0)));
}
def code(x): return (1.0 / math.sqrt(x)) - (1.0 / math.sqrt((x + 1.0)))
function code(x) return Float64(Float64(1.0 / sqrt(x)) - Float64(1.0 / sqrt(Float64(x + 1.0)))) end
function tmp = code(x) tmp = (1.0 / sqrt(x)) - (1.0 / sqrt((x + 1.0))); end
code[x_] := N[(N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision] - N[(1.0 / N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{\sqrt{x}} - \frac{1}{\sqrt{x + 1}}
\end{array}
(FPCore (x)
:precision binary64
(let* ((t_0 (sqrt (+ 1.0 x))))
(if (<= (- (/ 1.0 (sqrt x)) (/ 1.0 t_0)) 5e-7)
(/
(/ 1.0 (+ (sqrt x) t_0))
(- (+ 0.5 (+ x (/ 0.0625 (pow x 2.0)))) (/ 0.125 x)))
(- (pow x -0.5) (pow (+ 1.0 x) -0.5)))))
double code(double x) {
double t_0 = sqrt((1.0 + x));
double tmp;
if (((1.0 / sqrt(x)) - (1.0 / t_0)) <= 5e-7) {
tmp = (1.0 / (sqrt(x) + t_0)) / ((0.5 + (x + (0.0625 / pow(x, 2.0)))) - (0.125 / x));
} else {
tmp = pow(x, -0.5) - pow((1.0 + x), -0.5);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
real(8) :: tmp
t_0 = sqrt((1.0d0 + x))
if (((1.0d0 / sqrt(x)) - (1.0d0 / t_0)) <= 5d-7) then
tmp = (1.0d0 / (sqrt(x) + t_0)) / ((0.5d0 + (x + (0.0625d0 / (x ** 2.0d0)))) - (0.125d0 / x))
else
tmp = (x ** (-0.5d0)) - ((1.0d0 + x) ** (-0.5d0))
end if
code = tmp
end function
public static double code(double x) {
double t_0 = Math.sqrt((1.0 + x));
double tmp;
if (((1.0 / Math.sqrt(x)) - (1.0 / t_0)) <= 5e-7) {
tmp = (1.0 / (Math.sqrt(x) + t_0)) / ((0.5 + (x + (0.0625 / Math.pow(x, 2.0)))) - (0.125 / x));
} else {
tmp = Math.pow(x, -0.5) - Math.pow((1.0 + x), -0.5);
}
return tmp;
}
def code(x): t_0 = math.sqrt((1.0 + x)) tmp = 0 if ((1.0 / math.sqrt(x)) - (1.0 / t_0)) <= 5e-7: tmp = (1.0 / (math.sqrt(x) + t_0)) / ((0.5 + (x + (0.0625 / math.pow(x, 2.0)))) - (0.125 / x)) else: tmp = math.pow(x, -0.5) - math.pow((1.0 + x), -0.5) return tmp
function code(x) t_0 = sqrt(Float64(1.0 + x)) tmp = 0.0 if (Float64(Float64(1.0 / sqrt(x)) - Float64(1.0 / t_0)) <= 5e-7) tmp = Float64(Float64(1.0 / Float64(sqrt(x) + t_0)) / Float64(Float64(0.5 + Float64(x + Float64(0.0625 / (x ^ 2.0)))) - Float64(0.125 / x))); else tmp = Float64((x ^ -0.5) - (Float64(1.0 + x) ^ -0.5)); end return tmp end
function tmp_2 = code(x) t_0 = sqrt((1.0 + x)); tmp = 0.0; if (((1.0 / sqrt(x)) - (1.0 / t_0)) <= 5e-7) tmp = (1.0 / (sqrt(x) + t_0)) / ((0.5 + (x + (0.0625 / (x ^ 2.0)))) - (0.125 / x)); else tmp = (x ^ -0.5) - ((1.0 + x) ^ -0.5); end tmp_2 = tmp; end
code[x_] := Block[{t$95$0 = N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[N[(N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision] - N[(1.0 / t$95$0), $MachinePrecision]), $MachinePrecision], 5e-7], N[(N[(1.0 / N[(N[Sqrt[x], $MachinePrecision] + t$95$0), $MachinePrecision]), $MachinePrecision] / N[(N[(0.5 + N[(x + N[(0.0625 / N[Power[x, 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(0.125 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[Power[x, -0.5], $MachinePrecision] - N[Power[N[(1.0 + x), $MachinePrecision], -0.5], $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sqrt{1 + x}\\
\mathbf{if}\;\frac{1}{\sqrt{x}} - \frac{1}{t_0} \leq 5 \cdot 10^{-7}:\\
\;\;\;\;\frac{\frac{1}{\sqrt{x} + t_0}}{\left(0.5 + \left(x + \frac{0.0625}{{x}^{2}}\right)\right) - \frac{0.125}{x}}\\
\mathbf{else}:\\
\;\;\;\;{x}^{-0.5} - {\left(1 + x\right)}^{-0.5}\\
\end{array}
\end{array}
if (-.f64 (/.f64 1 (sqrt.f64 x)) (/.f64 1 (sqrt.f64 (+.f64 x 1)))) < 4.99999999999999977e-7Initial program 37.1%
*-un-lft-identity37.1%
clear-num37.1%
associate-/r/37.1%
prod-diff37.1%
*-un-lft-identity37.1%
fma-neg37.1%
*-un-lft-identity37.1%
pow1/237.1%
pow-flip31.0%
metadata-eval31.0%
pow1/231.0%
pow-flip37.1%
+-commutative37.1%
metadata-eval37.1%
Applied egg-rr37.1%
associate-+l-37.1%
expm1-log1p37.1%
expm1-def6.0%
associate--l-6.0%
fma-udef6.0%
distribute-lft1-in6.0%
metadata-eval6.0%
mul0-lft6.0%
metadata-eval6.0%
expm1-def37.1%
expm1-log1p37.1%
Simplified37.1%
metadata-eval37.1%
sqrt-pow231.2%
inv-pow31.2%
metadata-eval31.2%
pow-flip37.1%
metadata-eval37.1%
pow-pow5.4%
pow1/37.6%
frac-sub6.3%
*-un-lft-identity6.3%
pow1/34.1%
pow-pow37.2%
metadata-eval37.2%
pow1/237.2%
+-commutative37.2%
*-rgt-identity37.2%
pow1/337.2%
pow-pow37.2%
metadata-eval37.2%
pow1/237.2%
sqrt-unprod37.2%
Applied egg-rr37.2%
flip--38.6%
div-inv38.6%
add-sqr-sqrt39.4%
+-commutative39.4%
add-sqr-sqrt40.4%
associate--l+84.5%
Applied egg-rr84.5%
+-inverses84.5%
metadata-eval84.5%
*-lft-identity84.5%
+-commutative84.5%
Simplified84.5%
Taylor expanded in x around inf 99.6%
Simplified99.6%
if 4.99999999999999977e-7 < (-.f64 (/.f64 1 (sqrt.f64 x)) (/.f64 1 (sqrt.f64 (+.f64 x 1)))) Initial program 99.5%
*-un-lft-identity99.5%
clear-num99.5%
associate-/r/99.5%
prod-diff99.5%
*-un-lft-identity99.5%
fma-neg99.5%
*-un-lft-identity99.5%
pow1/299.5%
pow-flip99.9%
metadata-eval99.9%
pow1/299.9%
pow-flip99.9%
+-commutative99.9%
metadata-eval99.9%
Applied egg-rr99.9%
associate-+l-99.9%
expm1-log1p99.9%
expm1-def99.8%
associate--l-99.8%
fma-udef99.8%
distribute-lft1-in99.8%
metadata-eval99.8%
mul0-lft99.8%
metadata-eval99.8%
expm1-def99.9%
expm1-log1p99.9%
Simplified99.9%
Final simplification99.8%
(FPCore (x)
:precision binary64
(let* ((t_0 (sqrt (+ 1.0 x))))
(if (<= (- (/ 1.0 (sqrt x)) (/ 1.0 t_0)) 5e-7)
(/ (/ 1.0 (+ (sqrt x) t_0)) (+ x (+ 0.5 (/ -0.125 x))))
(- (pow x -0.5) (pow (+ 1.0 x) -0.5)))))
double code(double x) {
double t_0 = sqrt((1.0 + x));
double tmp;
if (((1.0 / sqrt(x)) - (1.0 / t_0)) <= 5e-7) {
tmp = (1.0 / (sqrt(x) + t_0)) / (x + (0.5 + (-0.125 / x)));
} else {
tmp = pow(x, -0.5) - pow((1.0 + x), -0.5);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
real(8) :: tmp
t_0 = sqrt((1.0d0 + x))
if (((1.0d0 / sqrt(x)) - (1.0d0 / t_0)) <= 5d-7) then
tmp = (1.0d0 / (sqrt(x) + t_0)) / (x + (0.5d0 + ((-0.125d0) / x)))
else
tmp = (x ** (-0.5d0)) - ((1.0d0 + x) ** (-0.5d0))
end if
code = tmp
end function
public static double code(double x) {
double t_0 = Math.sqrt((1.0 + x));
double tmp;
if (((1.0 / Math.sqrt(x)) - (1.0 / t_0)) <= 5e-7) {
tmp = (1.0 / (Math.sqrt(x) + t_0)) / (x + (0.5 + (-0.125 / x)));
} else {
tmp = Math.pow(x, -0.5) - Math.pow((1.0 + x), -0.5);
}
return tmp;
}
def code(x): t_0 = math.sqrt((1.0 + x)) tmp = 0 if ((1.0 / math.sqrt(x)) - (1.0 / t_0)) <= 5e-7: tmp = (1.0 / (math.sqrt(x) + t_0)) / (x + (0.5 + (-0.125 / x))) else: tmp = math.pow(x, -0.5) - math.pow((1.0 + x), -0.5) return tmp
function code(x) t_0 = sqrt(Float64(1.0 + x)) tmp = 0.0 if (Float64(Float64(1.0 / sqrt(x)) - Float64(1.0 / t_0)) <= 5e-7) tmp = Float64(Float64(1.0 / Float64(sqrt(x) + t_0)) / Float64(x + Float64(0.5 + Float64(-0.125 / x)))); else tmp = Float64((x ^ -0.5) - (Float64(1.0 + x) ^ -0.5)); end return tmp end
function tmp_2 = code(x) t_0 = sqrt((1.0 + x)); tmp = 0.0; if (((1.0 / sqrt(x)) - (1.0 / t_0)) <= 5e-7) tmp = (1.0 / (sqrt(x) + t_0)) / (x + (0.5 + (-0.125 / x))); else tmp = (x ^ -0.5) - ((1.0 + x) ^ -0.5); end tmp_2 = tmp; end
code[x_] := Block[{t$95$0 = N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[N[(N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision] - N[(1.0 / t$95$0), $MachinePrecision]), $MachinePrecision], 5e-7], N[(N[(1.0 / N[(N[Sqrt[x], $MachinePrecision] + t$95$0), $MachinePrecision]), $MachinePrecision] / N[(x + N[(0.5 + N[(-0.125 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[Power[x, -0.5], $MachinePrecision] - N[Power[N[(1.0 + x), $MachinePrecision], -0.5], $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sqrt{1 + x}\\
\mathbf{if}\;\frac{1}{\sqrt{x}} - \frac{1}{t_0} \leq 5 \cdot 10^{-7}:\\
\;\;\;\;\frac{\frac{1}{\sqrt{x} + t_0}}{x + \left(0.5 + \frac{-0.125}{x}\right)}\\
\mathbf{else}:\\
\;\;\;\;{x}^{-0.5} - {\left(1 + x\right)}^{-0.5}\\
\end{array}
\end{array}
if (-.f64 (/.f64 1 (sqrt.f64 x)) (/.f64 1 (sqrt.f64 (+.f64 x 1)))) < 4.99999999999999977e-7Initial program 37.1%
*-un-lft-identity37.1%
clear-num37.1%
associate-/r/37.1%
prod-diff37.1%
*-un-lft-identity37.1%
fma-neg37.1%
*-un-lft-identity37.1%
pow1/237.1%
pow-flip31.0%
metadata-eval31.0%
pow1/231.0%
pow-flip37.1%
+-commutative37.1%
metadata-eval37.1%
Applied egg-rr37.1%
associate-+l-37.1%
expm1-log1p37.1%
expm1-def6.0%
associate--l-6.0%
fma-udef6.0%
distribute-lft1-in6.0%
metadata-eval6.0%
mul0-lft6.0%
metadata-eval6.0%
expm1-def37.1%
expm1-log1p37.1%
Simplified37.1%
metadata-eval37.1%
sqrt-pow231.2%
inv-pow31.2%
metadata-eval31.2%
pow-flip37.1%
metadata-eval37.1%
pow-pow5.4%
pow1/37.6%
frac-sub6.3%
*-un-lft-identity6.3%
pow1/34.1%
pow-pow37.2%
metadata-eval37.2%
pow1/237.2%
+-commutative37.2%
*-rgt-identity37.2%
pow1/337.2%
pow-pow37.2%
metadata-eval37.2%
pow1/237.2%
sqrt-unprod37.2%
Applied egg-rr37.2%
flip--38.6%
div-inv38.6%
add-sqr-sqrt39.4%
+-commutative39.4%
add-sqr-sqrt40.4%
associate--l+84.5%
Applied egg-rr84.5%
+-inverses84.5%
metadata-eval84.5%
*-lft-identity84.5%
+-commutative84.5%
Simplified84.5%
Taylor expanded in x around inf 99.5%
sub-neg99.5%
+-commutative99.5%
associate-+l+99.5%
associate-*r/99.5%
metadata-eval99.5%
distribute-neg-frac99.5%
metadata-eval99.5%
Simplified99.5%
if 4.99999999999999977e-7 < (-.f64 (/.f64 1 (sqrt.f64 x)) (/.f64 1 (sqrt.f64 (+.f64 x 1)))) Initial program 99.5%
*-un-lft-identity99.5%
clear-num99.5%
associate-/r/99.5%
prod-diff99.5%
*-un-lft-identity99.5%
fma-neg99.5%
*-un-lft-identity99.5%
pow1/299.5%
pow-flip99.9%
metadata-eval99.9%
pow1/299.9%
pow-flip99.9%
+-commutative99.9%
metadata-eval99.9%
Applied egg-rr99.9%
associate-+l-99.9%
expm1-log1p99.9%
expm1-def99.8%
associate--l-99.8%
fma-udef99.8%
distribute-lft1-in99.8%
metadata-eval99.8%
mul0-lft99.8%
metadata-eval99.8%
expm1-def99.9%
expm1-log1p99.9%
Simplified99.9%
Final simplification99.7%
(FPCore (x)
:precision binary64
(let* ((t_0 (sqrt (+ 1.0 x))))
(if (<= (- (/ 1.0 (sqrt x)) (/ 1.0 t_0)) 5e-13)
(/ (/ 1.0 (+ (sqrt x) t_0)) (+ x 0.5))
(- (pow x -0.5) (pow (+ 1.0 x) -0.5)))))
double code(double x) {
double t_0 = sqrt((1.0 + x));
double tmp;
if (((1.0 / sqrt(x)) - (1.0 / t_0)) <= 5e-13) {
tmp = (1.0 / (sqrt(x) + t_0)) / (x + 0.5);
} else {
tmp = pow(x, -0.5) - pow((1.0 + x), -0.5);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
real(8) :: tmp
t_0 = sqrt((1.0d0 + x))
if (((1.0d0 / sqrt(x)) - (1.0d0 / t_0)) <= 5d-13) then
tmp = (1.0d0 / (sqrt(x) + t_0)) / (x + 0.5d0)
else
tmp = (x ** (-0.5d0)) - ((1.0d0 + x) ** (-0.5d0))
end if
code = tmp
end function
public static double code(double x) {
double t_0 = Math.sqrt((1.0 + x));
double tmp;
if (((1.0 / Math.sqrt(x)) - (1.0 / t_0)) <= 5e-13) {
tmp = (1.0 / (Math.sqrt(x) + t_0)) / (x + 0.5);
} else {
tmp = Math.pow(x, -0.5) - Math.pow((1.0 + x), -0.5);
}
return tmp;
}
def code(x): t_0 = math.sqrt((1.0 + x)) tmp = 0 if ((1.0 / math.sqrt(x)) - (1.0 / t_0)) <= 5e-13: tmp = (1.0 / (math.sqrt(x) + t_0)) / (x + 0.5) else: tmp = math.pow(x, -0.5) - math.pow((1.0 + x), -0.5) return tmp
function code(x) t_0 = sqrt(Float64(1.0 + x)) tmp = 0.0 if (Float64(Float64(1.0 / sqrt(x)) - Float64(1.0 / t_0)) <= 5e-13) tmp = Float64(Float64(1.0 / Float64(sqrt(x) + t_0)) / Float64(x + 0.5)); else tmp = Float64((x ^ -0.5) - (Float64(1.0 + x) ^ -0.5)); end return tmp end
function tmp_2 = code(x) t_0 = sqrt((1.0 + x)); tmp = 0.0; if (((1.0 / sqrt(x)) - (1.0 / t_0)) <= 5e-13) tmp = (1.0 / (sqrt(x) + t_0)) / (x + 0.5); else tmp = (x ^ -0.5) - ((1.0 + x) ^ -0.5); end tmp_2 = tmp; end
code[x_] := Block[{t$95$0 = N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[N[(N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision] - N[(1.0 / t$95$0), $MachinePrecision]), $MachinePrecision], 5e-13], N[(N[(1.0 / N[(N[Sqrt[x], $MachinePrecision] + t$95$0), $MachinePrecision]), $MachinePrecision] / N[(x + 0.5), $MachinePrecision]), $MachinePrecision], N[(N[Power[x, -0.5], $MachinePrecision] - N[Power[N[(1.0 + x), $MachinePrecision], -0.5], $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sqrt{1 + x}\\
\mathbf{if}\;\frac{1}{\sqrt{x}} - \frac{1}{t_0} \leq 5 \cdot 10^{-13}:\\
\;\;\;\;\frac{\frac{1}{\sqrt{x} + t_0}}{x + 0.5}\\
\mathbf{else}:\\
\;\;\;\;{x}^{-0.5} - {\left(1 + x\right)}^{-0.5}\\
\end{array}
\end{array}
if (-.f64 (/.f64 1 (sqrt.f64 x)) (/.f64 1 (sqrt.f64 (+.f64 x 1)))) < 4.9999999999999999e-13Initial program 36.7%
*-un-lft-identity36.7%
clear-num36.7%
associate-/r/36.7%
prod-diff36.7%
*-un-lft-identity36.7%
fma-neg36.7%
*-un-lft-identity36.7%
pow1/236.7%
pow-flip30.5%
metadata-eval30.5%
pow1/230.5%
pow-flip36.7%
+-commutative36.7%
metadata-eval36.7%
Applied egg-rr36.7%
associate-+l-36.7%
expm1-log1p36.7%
expm1-def5.5%
associate--l-5.5%
fma-udef5.5%
distribute-lft1-in5.5%
metadata-eval5.5%
mul0-lft5.5%
metadata-eval5.5%
expm1-def36.7%
expm1-log1p36.7%
Simplified36.7%
metadata-eval36.7%
sqrt-pow230.7%
inv-pow30.7%
metadata-eval30.7%
pow-flip36.7%
metadata-eval36.7%
pow-pow4.8%
pow1/36.9%
frac-sub5.6%
*-un-lft-identity5.6%
pow1/33.4%
pow-pow36.7%
metadata-eval36.7%
pow1/236.7%
+-commutative36.7%
*-rgt-identity36.7%
pow1/336.7%
pow-pow36.7%
metadata-eval36.7%
pow1/236.7%
sqrt-unprod36.7%
Applied egg-rr36.7%
flip--38.0%
div-inv38.0%
add-sqr-sqrt38.9%
+-commutative38.9%
add-sqr-sqrt39.9%
associate--l+84.4%
Applied egg-rr84.4%
+-inverses84.4%
metadata-eval84.4%
*-lft-identity84.4%
+-commutative84.4%
Simplified84.4%
Taylor expanded in x around inf 99.6%
+-commutative7.8%
Simplified99.6%
if 4.9999999999999999e-13 < (-.f64 (/.f64 1 (sqrt.f64 x)) (/.f64 1 (sqrt.f64 (+.f64 x 1)))) Initial program 99.4%
*-un-lft-identity99.4%
clear-num99.4%
associate-/r/99.4%
prod-diff99.4%
*-un-lft-identity99.4%
fma-neg99.4%
*-un-lft-identity99.4%
pow1/299.4%
pow-flip99.8%
metadata-eval99.8%
pow1/299.8%
pow-flip99.8%
+-commutative99.8%
metadata-eval99.8%
Applied egg-rr99.8%
associate-+l-99.8%
expm1-log1p99.8%
expm1-def99.6%
associate--l-99.6%
fma-udef99.6%
distribute-lft1-in99.6%
metadata-eval99.6%
mul0-lft99.6%
metadata-eval99.6%
expm1-def99.8%
expm1-log1p99.8%
Simplified99.8%
Final simplification99.7%
(FPCore (x) :precision binary64 (if (<= (- (/ 1.0 (sqrt x)) (/ 1.0 (sqrt (+ 1.0 x)))) 5e-13) (* 0.5 (pow x -1.5)) (- (pow x -0.5) (pow (+ 1.0 x) -0.5))))
double code(double x) {
double tmp;
if (((1.0 / sqrt(x)) - (1.0 / sqrt((1.0 + x)))) <= 5e-13) {
tmp = 0.5 * pow(x, -1.5);
} else {
tmp = pow(x, -0.5) - pow((1.0 + x), -0.5);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (((1.0d0 / sqrt(x)) - (1.0d0 / sqrt((1.0d0 + x)))) <= 5d-13) then
tmp = 0.5d0 * (x ** (-1.5d0))
else
tmp = (x ** (-0.5d0)) - ((1.0d0 + x) ** (-0.5d0))
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (((1.0 / Math.sqrt(x)) - (1.0 / Math.sqrt((1.0 + x)))) <= 5e-13) {
tmp = 0.5 * Math.pow(x, -1.5);
} else {
tmp = Math.pow(x, -0.5) - Math.pow((1.0 + x), -0.5);
}
return tmp;
}
def code(x): tmp = 0 if ((1.0 / math.sqrt(x)) - (1.0 / math.sqrt((1.0 + x)))) <= 5e-13: tmp = 0.5 * math.pow(x, -1.5) else: tmp = math.pow(x, -0.5) - math.pow((1.0 + x), -0.5) return tmp
function code(x) tmp = 0.0 if (Float64(Float64(1.0 / sqrt(x)) - Float64(1.0 / sqrt(Float64(1.0 + x)))) <= 5e-13) tmp = Float64(0.5 * (x ^ -1.5)); else tmp = Float64((x ^ -0.5) - (Float64(1.0 + x) ^ -0.5)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (((1.0 / sqrt(x)) - (1.0 / sqrt((1.0 + x)))) <= 5e-13) tmp = 0.5 * (x ^ -1.5); else tmp = (x ^ -0.5) - ((1.0 + x) ^ -0.5); end tmp_2 = tmp; end
code[x_] := If[LessEqual[N[(N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision] - N[(1.0 / N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 5e-13], N[(0.5 * N[Power[x, -1.5], $MachinePrecision]), $MachinePrecision], N[(N[Power[x, -0.5], $MachinePrecision] - N[Power[N[(1.0 + x), $MachinePrecision], -0.5], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{1}{\sqrt{x}} - \frac{1}{\sqrt{1 + x}} \leq 5 \cdot 10^{-13}:\\
\;\;\;\;0.5 \cdot {x}^{-1.5}\\
\mathbf{else}:\\
\;\;\;\;{x}^{-0.5} - {\left(1 + x\right)}^{-0.5}\\
\end{array}
\end{array}
if (-.f64 (/.f64 1 (sqrt.f64 x)) (/.f64 1 (sqrt.f64 (+.f64 x 1)))) < 4.9999999999999999e-13Initial program 36.7%
*-un-lft-identity36.7%
clear-num36.7%
associate-/r/36.7%
prod-diff36.7%
*-un-lft-identity36.7%
fma-neg36.7%
*-un-lft-identity36.7%
pow1/236.7%
pow-flip30.5%
metadata-eval30.5%
pow1/230.5%
pow-flip36.7%
+-commutative36.7%
metadata-eval36.7%
Applied egg-rr36.7%
associate-+l-36.7%
expm1-log1p36.7%
expm1-def5.5%
associate--l-5.5%
fma-udef5.5%
distribute-lft1-in5.5%
metadata-eval5.5%
mul0-lft5.5%
metadata-eval5.5%
expm1-def36.7%
expm1-log1p36.7%
Simplified36.7%
Taylor expanded in x around inf 69.3%
expm1-log1p-u69.3%
expm1-udef35.3%
pow-flip35.3%
sqrt-pow135.3%
metadata-eval35.3%
metadata-eval35.3%
Applied egg-rr35.3%
expm1-def98.9%
expm1-log1p98.9%
Simplified98.9%
if 4.9999999999999999e-13 < (-.f64 (/.f64 1 (sqrt.f64 x)) (/.f64 1 (sqrt.f64 (+.f64 x 1)))) Initial program 99.4%
*-un-lft-identity99.4%
clear-num99.4%
associate-/r/99.4%
prod-diff99.4%
*-un-lft-identity99.4%
fma-neg99.4%
*-un-lft-identity99.4%
pow1/299.4%
pow-flip99.8%
metadata-eval99.8%
pow1/299.8%
pow-flip99.8%
+-commutative99.8%
metadata-eval99.8%
Applied egg-rr99.8%
associate-+l-99.8%
expm1-log1p99.8%
expm1-def99.6%
associate--l-99.6%
fma-udef99.6%
distribute-lft1-in99.6%
metadata-eval99.6%
mul0-lft99.6%
metadata-eval99.6%
expm1-def99.8%
expm1-log1p99.8%
Simplified99.8%
Final simplification99.4%
(FPCore (x) :precision binary64 (/ 1.0 (* (hypot x (sqrt x)) (+ (sqrt x) (sqrt (+ 1.0 x))))))
double code(double x) {
return 1.0 / (hypot(x, sqrt(x)) * (sqrt(x) + sqrt((1.0 + x))));
}
public static double code(double x) {
return 1.0 / (Math.hypot(x, Math.sqrt(x)) * (Math.sqrt(x) + Math.sqrt((1.0 + x))));
}
def code(x): return 1.0 / (math.hypot(x, math.sqrt(x)) * (math.sqrt(x) + math.sqrt((1.0 + x))))
function code(x) return Float64(1.0 / Float64(hypot(x, sqrt(x)) * Float64(sqrt(x) + sqrt(Float64(1.0 + x))))) end
function tmp = code(x) tmp = 1.0 / (hypot(x, sqrt(x)) * (sqrt(x) + sqrt((1.0 + x)))); end
code[x_] := N[(1.0 / N[(N[Sqrt[x ^ 2 + N[Sqrt[x], $MachinePrecision] ^ 2], $MachinePrecision] * N[(N[Sqrt[x], $MachinePrecision] + N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{\mathsf{hypot}\left(x, \sqrt{x}\right) \cdot \left(\sqrt{x} + \sqrt{1 + x}\right)}
\end{array}
Initial program 71.7%
*-un-lft-identity71.7%
clear-num71.7%
associate-/r/71.7%
prod-diff71.7%
*-un-lft-identity71.7%
fma-neg71.7%
*-un-lft-identity71.7%
pow1/271.7%
pow-flip69.2%
metadata-eval69.2%
pow1/269.2%
pow-flip71.9%
+-commutative71.9%
metadata-eval71.9%
Applied egg-rr71.9%
associate-+l-71.9%
expm1-log1p71.9%
expm1-def58.1%
associate--l-58.1%
fma-udef58.1%
distribute-lft1-in58.1%
metadata-eval58.1%
mul0-lft58.1%
metadata-eval58.1%
expm1-def71.9%
expm1-log1p71.9%
Simplified71.9%
metadata-eval71.9%
sqrt-pow269.1%
inv-pow69.1%
metadata-eval69.1%
pow-flip71.7%
metadata-eval71.7%
pow-pow57.6%
pow1/358.6%
frac-sub58.0%
*-un-lft-identity58.0%
pow1/356.9%
pow-pow71.7%
metadata-eval71.7%
pow1/271.7%
+-commutative71.7%
*-rgt-identity71.7%
pow1/371.7%
pow-pow71.7%
metadata-eval71.7%
pow1/271.7%
sqrt-unprod71.7%
Applied egg-rr71.7%
flip--72.4%
div-inv72.4%
add-sqr-sqrt72.7%
+-commutative72.7%
add-sqr-sqrt73.2%
associate--l+92.8%
Applied egg-rr92.8%
+-inverses92.8%
metadata-eval92.8%
*-lft-identity92.8%
+-commutative92.8%
Simplified92.8%
expm1-log1p-u89.1%
expm1-udef67.2%
associate-/l/67.2%
associate-/r*67.2%
distribute-rgt-in67.2%
*-un-lft-identity67.2%
add-sqr-sqrt67.2%
hypot-def67.2%
Applied egg-rr67.2%
expm1-def95.8%
expm1-log1p99.5%
associate-/r*99.1%
+-commutative99.1%
Simplified99.1%
Final simplification99.1%
(FPCore (x) :precision binary64 (if (<= x 1.0) (- (pow x -0.5) (+ 1.0 (* x -0.5))) (* 0.5 (pow x -1.5))))
double code(double x) {
double tmp;
if (x <= 1.0) {
tmp = pow(x, -0.5) - (1.0 + (x * -0.5));
} else {
tmp = 0.5 * pow(x, -1.5);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 1.0d0) then
tmp = (x ** (-0.5d0)) - (1.0d0 + (x * (-0.5d0)))
else
tmp = 0.5d0 * (x ** (-1.5d0))
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 1.0) {
tmp = Math.pow(x, -0.5) - (1.0 + (x * -0.5));
} else {
tmp = 0.5 * Math.pow(x, -1.5);
}
return tmp;
}
def code(x): tmp = 0 if x <= 1.0: tmp = math.pow(x, -0.5) - (1.0 + (x * -0.5)) else: tmp = 0.5 * math.pow(x, -1.5) return tmp
function code(x) tmp = 0.0 if (x <= 1.0) tmp = Float64((x ^ -0.5) - Float64(1.0 + Float64(x * -0.5))); else tmp = Float64(0.5 * (x ^ -1.5)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 1.0) tmp = (x ^ -0.5) - (1.0 + (x * -0.5)); else tmp = 0.5 * (x ^ -1.5); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 1.0], N[(N[Power[x, -0.5], $MachinePrecision] - N[(1.0 + N[(x * -0.5), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(0.5 * N[Power[x, -1.5], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 1:\\
\;\;\;\;{x}^{-0.5} - \left(1 + x \cdot -0.5\right)\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot {x}^{-1.5}\\
\end{array}
\end{array}
if x < 1Initial program 99.6%
*-un-lft-identity99.6%
clear-num99.6%
associate-/r/99.6%
prod-diff99.6%
*-un-lft-identity99.6%
fma-neg99.6%
*-un-lft-identity99.6%
pow1/299.6%
pow-flip100.0%
metadata-eval100.0%
pow1/2100.0%
pow-flip100.0%
+-commutative100.0%
metadata-eval100.0%
Applied egg-rr100.0%
associate-+l-100.0%
expm1-log1p100.0%
expm1-def100.0%
associate--l-100.0%
fma-udef100.0%
distribute-lft1-in100.0%
metadata-eval100.0%
mul0-lft100.0%
metadata-eval100.0%
expm1-def100.0%
expm1-log1p100.0%
Simplified100.0%
Taylor expanded in x around 0 98.9%
*-commutative98.9%
Simplified98.9%
if 1 < x Initial program 37.5%
*-un-lft-identity37.5%
clear-num37.5%
associate-/r/37.5%
prod-diff37.5%
*-un-lft-identity37.5%
fma-neg37.5%
*-un-lft-identity37.5%
pow1/237.5%
pow-flip31.5%
metadata-eval31.5%
pow1/231.5%
pow-flip37.6%
+-commutative37.6%
metadata-eval37.6%
Applied egg-rr37.6%
associate-+l-37.6%
expm1-log1p37.6%
expm1-def6.7%
associate--l-6.7%
fma-udef6.7%
distribute-lft1-in6.7%
metadata-eval6.7%
mul0-lft6.7%
metadata-eval6.7%
expm1-def37.6%
expm1-log1p37.6%
Simplified37.6%
Taylor expanded in x around inf 68.7%
expm1-log1p-u68.7%
expm1-udef35.3%
pow-flip35.3%
sqrt-pow135.3%
metadata-eval35.3%
metadata-eval35.3%
Applied egg-rr35.3%
expm1-def97.8%
expm1-log1p97.8%
Simplified97.8%
Final simplification98.4%
(FPCore (x) :precision binary64 (if (<= x 0.5) (/ 1.0 (sqrt x)) (* 0.5 (pow x -1.5))))
double code(double x) {
double tmp;
if (x <= 0.5) {
tmp = 1.0 / sqrt(x);
} else {
tmp = 0.5 * pow(x, -1.5);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 0.5d0) then
tmp = 1.0d0 / sqrt(x)
else
tmp = 0.5d0 * (x ** (-1.5d0))
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 0.5) {
tmp = 1.0 / Math.sqrt(x);
} else {
tmp = 0.5 * Math.pow(x, -1.5);
}
return tmp;
}
def code(x): tmp = 0 if x <= 0.5: tmp = 1.0 / math.sqrt(x) else: tmp = 0.5 * math.pow(x, -1.5) return tmp
function code(x) tmp = 0.0 if (x <= 0.5) tmp = Float64(1.0 / sqrt(x)); else tmp = Float64(0.5 * (x ^ -1.5)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 0.5) tmp = 1.0 / sqrt(x); else tmp = 0.5 * (x ^ -1.5); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 0.5], N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision], N[(0.5 * N[Power[x, -1.5], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 0.5:\\
\;\;\;\;\frac{1}{\sqrt{x}}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot {x}^{-1.5}\\
\end{array}
\end{array}
if x < 0.5Initial program 99.6%
*-un-lft-identity99.6%
clear-num99.6%
associate-/r/99.6%
prod-diff99.6%
*-un-lft-identity99.6%
fma-neg99.6%
*-un-lft-identity99.6%
pow1/299.6%
pow-flip100.0%
metadata-eval100.0%
pow1/2100.0%
pow-flip100.0%
+-commutative100.0%
metadata-eval100.0%
Applied egg-rr100.0%
associate-+l-100.0%
expm1-log1p100.0%
expm1-def100.0%
associate--l-100.0%
fma-udef100.0%
distribute-lft1-in100.0%
metadata-eval100.0%
mul0-lft100.0%
metadata-eval100.0%
expm1-def100.0%
expm1-log1p100.0%
Simplified100.0%
metadata-eval100.0%
sqrt-pow299.6%
inv-pow99.6%
metadata-eval99.6%
pow-flip99.6%
metadata-eval99.6%
pow-pow99.6%
pow1/399.6%
frac-sub99.5%
*-un-lft-identity99.5%
pow1/399.4%
pow-pow99.5%
metadata-eval99.5%
pow1/299.5%
+-commutative99.5%
*-rgt-identity99.5%
pow1/399.5%
pow-pow99.5%
metadata-eval99.5%
pow1/299.5%
sqrt-unprod99.5%
Applied egg-rr99.5%
Taylor expanded in x around 0 93.7%
Taylor expanded in x around 0 93.7%
if 0.5 < x Initial program 37.5%
*-un-lft-identity37.5%
clear-num37.5%
associate-/r/37.5%
prod-diff37.5%
*-un-lft-identity37.5%
fma-neg37.5%
*-un-lft-identity37.5%
pow1/237.5%
pow-flip31.5%
metadata-eval31.5%
pow1/231.5%
pow-flip37.6%
+-commutative37.6%
metadata-eval37.6%
Applied egg-rr37.6%
associate-+l-37.6%
expm1-log1p37.6%
expm1-def6.7%
associate--l-6.7%
fma-udef6.7%
distribute-lft1-in6.7%
metadata-eval6.7%
mul0-lft6.7%
metadata-eval6.7%
expm1-def37.6%
expm1-log1p37.6%
Simplified37.6%
Taylor expanded in x around inf 68.7%
expm1-log1p-u68.7%
expm1-udef35.3%
pow-flip35.3%
sqrt-pow135.3%
metadata-eval35.3%
metadata-eval35.3%
Applied egg-rr35.3%
expm1-def97.8%
expm1-log1p97.8%
Simplified97.8%
Final simplification95.6%
(FPCore (x) :precision binary64 (if (<= x 0.68) (+ (pow x -0.5) -1.0) (* 0.5 (pow x -1.5))))
double code(double x) {
double tmp;
if (x <= 0.68) {
tmp = pow(x, -0.5) + -1.0;
} else {
tmp = 0.5 * pow(x, -1.5);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 0.68d0) then
tmp = (x ** (-0.5d0)) + (-1.0d0)
else
tmp = 0.5d0 * (x ** (-1.5d0))
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 0.68) {
tmp = Math.pow(x, -0.5) + -1.0;
} else {
tmp = 0.5 * Math.pow(x, -1.5);
}
return tmp;
}
def code(x): tmp = 0 if x <= 0.68: tmp = math.pow(x, -0.5) + -1.0 else: tmp = 0.5 * math.pow(x, -1.5) return tmp
function code(x) tmp = 0.0 if (x <= 0.68) tmp = Float64((x ^ -0.5) + -1.0); else tmp = Float64(0.5 * (x ^ -1.5)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 0.68) tmp = (x ^ -0.5) + -1.0; else tmp = 0.5 * (x ^ -1.5); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 0.68], N[(N[Power[x, -0.5], $MachinePrecision] + -1.0), $MachinePrecision], N[(0.5 * N[Power[x, -1.5], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 0.68:\\
\;\;\;\;{x}^{-0.5} + -1\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot {x}^{-1.5}\\
\end{array}
\end{array}
if x < 0.680000000000000049Initial program 99.6%
*-un-lft-identity99.6%
clear-num99.6%
associate-/r/99.6%
prod-diff99.6%
*-un-lft-identity99.6%
fma-neg99.6%
*-un-lft-identity99.6%
pow1/299.6%
pow-flip100.0%
metadata-eval100.0%
pow1/2100.0%
pow-flip100.0%
+-commutative100.0%
metadata-eval100.0%
Applied egg-rr100.0%
associate-+l-100.0%
expm1-log1p100.0%
expm1-def100.0%
associate--l-100.0%
fma-udef100.0%
distribute-lft1-in100.0%
metadata-eval100.0%
mul0-lft100.0%
metadata-eval100.0%
expm1-def100.0%
expm1-log1p100.0%
Simplified100.0%
Taylor expanded in x around 0 97.9%
if 0.680000000000000049 < x Initial program 37.5%
*-un-lft-identity37.5%
clear-num37.5%
associate-/r/37.5%
prod-diff37.5%
*-un-lft-identity37.5%
fma-neg37.5%
*-un-lft-identity37.5%
pow1/237.5%
pow-flip31.5%
metadata-eval31.5%
pow1/231.5%
pow-flip37.6%
+-commutative37.6%
metadata-eval37.6%
Applied egg-rr37.6%
associate-+l-37.6%
expm1-log1p37.6%
expm1-def6.7%
associate--l-6.7%
fma-udef6.7%
distribute-lft1-in6.7%
metadata-eval6.7%
mul0-lft6.7%
metadata-eval6.7%
expm1-def37.6%
expm1-log1p37.6%
Simplified37.6%
Taylor expanded in x around inf 68.7%
expm1-log1p-u68.7%
expm1-udef35.3%
pow-flip35.3%
sqrt-pow135.3%
metadata-eval35.3%
metadata-eval35.3%
Applied egg-rr35.3%
expm1-def97.8%
expm1-log1p97.8%
Simplified97.8%
Final simplification97.9%
(FPCore (x) :precision binary64 (/ 1.0 (sqrt x)))
double code(double x) {
return 1.0 / sqrt(x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 / sqrt(x)
end function
public static double code(double x) {
return 1.0 / Math.sqrt(x);
}
def code(x): return 1.0 / math.sqrt(x)
function code(x) return Float64(1.0 / sqrt(x)) end
function tmp = code(x) tmp = 1.0 / sqrt(x); end
code[x_] := N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{\sqrt{x}}
\end{array}
Initial program 71.7%
*-un-lft-identity71.7%
clear-num71.7%
associate-/r/71.7%
prod-diff71.7%
*-un-lft-identity71.7%
fma-neg71.7%
*-un-lft-identity71.7%
pow1/271.7%
pow-flip69.2%
metadata-eval69.2%
pow1/269.2%
pow-flip71.9%
+-commutative71.9%
metadata-eval71.9%
Applied egg-rr71.9%
associate-+l-71.9%
expm1-log1p71.9%
expm1-def58.1%
associate--l-58.1%
fma-udef58.1%
distribute-lft1-in58.1%
metadata-eval58.1%
mul0-lft58.1%
metadata-eval58.1%
expm1-def71.9%
expm1-log1p71.9%
Simplified71.9%
metadata-eval71.9%
sqrt-pow269.1%
inv-pow69.1%
metadata-eval69.1%
pow-flip71.7%
metadata-eval71.7%
pow-pow57.6%
pow1/358.6%
frac-sub58.0%
*-un-lft-identity58.0%
pow1/356.9%
pow-pow71.7%
metadata-eval71.7%
pow1/271.7%
+-commutative71.7%
*-rgt-identity71.7%
pow1/371.7%
pow-pow71.7%
metadata-eval71.7%
pow1/271.7%
sqrt-unprod71.7%
Applied egg-rr71.7%
Taylor expanded in x around 0 68.0%
Taylor expanded in x around 0 54.2%
Final simplification54.2%
(FPCore (x) :precision binary64 (/ 1.0 (+ x 0.5)))
double code(double x) {
return 1.0 / (x + 0.5);
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 / (x + 0.5d0)
end function
public static double code(double x) {
return 1.0 / (x + 0.5);
}
def code(x): return 1.0 / (x + 0.5)
function code(x) return Float64(1.0 / Float64(x + 0.5)) end
function tmp = code(x) tmp = 1.0 / (x + 0.5); end
code[x_] := N[(1.0 / N[(x + 0.5), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{x + 0.5}
\end{array}
Initial program 71.7%
*-un-lft-identity71.7%
clear-num71.7%
associate-/r/71.7%
prod-diff71.7%
*-un-lft-identity71.7%
fma-neg71.7%
*-un-lft-identity71.7%
pow1/271.7%
pow-flip69.2%
metadata-eval69.2%
pow1/269.2%
pow-flip71.9%
+-commutative71.9%
metadata-eval71.9%
Applied egg-rr71.9%
associate-+l-71.9%
expm1-log1p71.9%
expm1-def58.1%
associate--l-58.1%
fma-udef58.1%
distribute-lft1-in58.1%
metadata-eval58.1%
mul0-lft58.1%
metadata-eval58.1%
expm1-def71.9%
expm1-log1p71.9%
Simplified71.9%
metadata-eval71.9%
sqrt-pow269.1%
inv-pow69.1%
metadata-eval69.1%
pow-flip71.7%
metadata-eval71.7%
pow-pow57.6%
pow1/358.6%
frac-sub58.0%
*-un-lft-identity58.0%
pow1/356.9%
pow-pow71.7%
metadata-eval71.7%
pow1/271.7%
+-commutative71.7%
*-rgt-identity71.7%
pow1/371.7%
pow-pow71.7%
metadata-eval71.7%
pow1/271.7%
sqrt-unprod71.7%
Applied egg-rr71.7%
Taylor expanded in x around 0 68.0%
Taylor expanded in x around inf 7.5%
+-commutative7.5%
Simplified7.5%
Final simplification7.5%
(FPCore (x) :precision binary64 (/ 1.0 x))
double code(double x) {
return 1.0 / x;
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 / x
end function
public static double code(double x) {
return 1.0 / x;
}
def code(x): return 1.0 / x
function code(x) return Float64(1.0 / x) end
function tmp = code(x) tmp = 1.0 / x; end
code[x_] := N[(1.0 / x), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{x}
\end{array}
Initial program 71.7%
*-un-lft-identity71.7%
clear-num71.7%
associate-/r/71.7%
prod-diff71.7%
*-un-lft-identity71.7%
fma-neg71.7%
*-un-lft-identity71.7%
pow1/271.7%
pow-flip69.2%
metadata-eval69.2%
pow1/269.2%
pow-flip71.9%
+-commutative71.9%
metadata-eval71.9%
Applied egg-rr71.9%
associate-+l-71.9%
expm1-log1p71.9%
expm1-def58.1%
associate--l-58.1%
fma-udef58.1%
distribute-lft1-in58.1%
metadata-eval58.1%
mul0-lft58.1%
metadata-eval58.1%
expm1-def71.9%
expm1-log1p71.9%
Simplified71.9%
metadata-eval71.9%
sqrt-pow269.1%
inv-pow69.1%
metadata-eval69.1%
pow-flip71.7%
metadata-eval71.7%
pow-pow57.6%
pow1/358.6%
frac-sub58.0%
*-un-lft-identity58.0%
pow1/356.9%
pow-pow71.7%
metadata-eval71.7%
pow1/271.7%
+-commutative71.7%
*-rgt-identity71.7%
pow1/371.7%
pow-pow71.7%
metadata-eval71.7%
pow1/271.7%
sqrt-unprod71.7%
Applied egg-rr71.7%
Taylor expanded in x around 0 68.0%
Taylor expanded in x around inf 7.4%
Final simplification7.4%
(FPCore (x) :precision binary64 (/ 1.0 (+ (* (+ x 1.0) (sqrt x)) (* x (sqrt (+ x 1.0))))))
double code(double x) {
return 1.0 / (((x + 1.0) * sqrt(x)) + (x * sqrt((x + 1.0))));
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 / (((x + 1.0d0) * sqrt(x)) + (x * sqrt((x + 1.0d0))))
end function
public static double code(double x) {
return 1.0 / (((x + 1.0) * Math.sqrt(x)) + (x * Math.sqrt((x + 1.0))));
}
def code(x): return 1.0 / (((x + 1.0) * math.sqrt(x)) + (x * math.sqrt((x + 1.0))))
function code(x) return Float64(1.0 / Float64(Float64(Float64(x + 1.0) * sqrt(x)) + Float64(x * sqrt(Float64(x + 1.0))))) end
function tmp = code(x) tmp = 1.0 / (((x + 1.0) * sqrt(x)) + (x * sqrt((x + 1.0)))); end
code[x_] := N[(1.0 / N[(N[(N[(x + 1.0), $MachinePrecision] * N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + N[(x * N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{\left(x + 1\right) \cdot \sqrt{x} + x \cdot \sqrt{x + 1}}
\end{array}
herbie shell --seed 2024023
(FPCore (x)
:name "2isqrt (example 3.6)"
:precision binary64
:herbie-target
(/ 1.0 (+ (* (+ x 1.0) (sqrt x)) (* x (sqrt (+ x 1.0)))))
(- (/ 1.0 (sqrt x)) (/ 1.0 (sqrt (+ x 1.0)))))