
(FPCore (x) :precision binary64 (- (/ 1.0 (+ x 1.0)) (/ 1.0 x)))
double code(double x) {
return (1.0 / (x + 1.0)) - (1.0 / x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = (1.0d0 / (x + 1.0d0)) - (1.0d0 / x)
end function
public static double code(double x) {
return (1.0 / (x + 1.0)) - (1.0 / x);
}
def code(x): return (1.0 / (x + 1.0)) - (1.0 / x)
function code(x) return Float64(Float64(1.0 / Float64(x + 1.0)) - Float64(1.0 / x)) end
function tmp = code(x) tmp = (1.0 / (x + 1.0)) - (1.0 / x); end
code[x_] := N[(N[(1.0 / N[(x + 1.0), $MachinePrecision]), $MachinePrecision] - N[(1.0 / x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{x + 1} - \frac{1}{x}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 7 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (- (/ 1.0 (+ x 1.0)) (/ 1.0 x)))
double code(double x) {
return (1.0 / (x + 1.0)) - (1.0 / x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = (1.0d0 / (x + 1.0d0)) - (1.0d0 / x)
end function
public static double code(double x) {
return (1.0 / (x + 1.0)) - (1.0 / x);
}
def code(x): return (1.0 / (x + 1.0)) - (1.0 / x)
function code(x) return Float64(Float64(1.0 / Float64(x + 1.0)) - Float64(1.0 / x)) end
function tmp = code(x) tmp = (1.0 / (x + 1.0)) - (1.0 / x); end
code[x_] := N[(N[(1.0 / N[(x + 1.0), $MachinePrecision]), $MachinePrecision] - N[(1.0 / x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{x + 1} - \frac{1}{x}
\end{array}
(FPCore (x) :precision binary64 (/ (/ 1.0 x) (- -1.0 x)))
double code(double x) {
return (1.0 / x) / (-1.0 - x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = (1.0d0 / x) / ((-1.0d0) - x)
end function
public static double code(double x) {
return (1.0 / x) / (-1.0 - x);
}
def code(x): return (1.0 / x) / (-1.0 - x)
function code(x) return Float64(Float64(1.0 / x) / Float64(-1.0 - x)) end
function tmp = code(x) tmp = (1.0 / x) / (-1.0 - x); end
code[x_] := N[(N[(1.0 / x), $MachinePrecision] / N[(-1.0 - x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\frac{1}{x}}{-1 - x}
\end{array}
Initial program 74.3%
clear-num74.3%
frac-sub75.8%
*-un-lft-identity75.8%
div-inv75.8%
metadata-eval75.8%
*-rgt-identity75.8%
*-rgt-identity75.8%
+-commutative75.8%
*-commutative75.8%
div-inv75.8%
metadata-eval75.8%
*-rgt-identity75.8%
+-commutative75.8%
Applied egg-rr75.8%
associate-/r*75.8%
div-inv75.8%
+-commutative75.8%
associate--r+99.7%
+-commutative99.7%
Applied egg-rr99.7%
un-div-inv99.8%
+-inverses99.8%
metadata-eval99.8%
Applied egg-rr99.8%
Final simplification99.8%
(FPCore (x) :precision binary64 (if (or (<= x -1.0) (not (<= x 3.8e+61))) (+ (/ 1.0 x) (/ -1.0 x)) (+ (- 1.0 x) (/ -1.0 x))))
double code(double x) {
double tmp;
if ((x <= -1.0) || !(x <= 3.8e+61)) {
tmp = (1.0 / x) + (-1.0 / x);
} else {
tmp = (1.0 - x) + (-1.0 / x);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if ((x <= (-1.0d0)) .or. (.not. (x <= 3.8d+61))) then
tmp = (1.0d0 / x) + ((-1.0d0) / x)
else
tmp = (1.0d0 - x) + ((-1.0d0) / x)
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if ((x <= -1.0) || !(x <= 3.8e+61)) {
tmp = (1.0 / x) + (-1.0 / x);
} else {
tmp = (1.0 - x) + (-1.0 / x);
}
return tmp;
}
def code(x): tmp = 0 if (x <= -1.0) or not (x <= 3.8e+61): tmp = (1.0 / x) + (-1.0 / x) else: tmp = (1.0 - x) + (-1.0 / x) return tmp
function code(x) tmp = 0.0 if ((x <= -1.0) || !(x <= 3.8e+61)) tmp = Float64(Float64(1.0 / x) + Float64(-1.0 / x)); else tmp = Float64(Float64(1.0 - x) + Float64(-1.0 / x)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if ((x <= -1.0) || ~((x <= 3.8e+61))) tmp = (1.0 / x) + (-1.0 / x); else tmp = (1.0 - x) + (-1.0 / x); end tmp_2 = tmp; end
code[x_] := If[Or[LessEqual[x, -1.0], N[Not[LessEqual[x, 3.8e+61]], $MachinePrecision]], N[(N[(1.0 / x), $MachinePrecision] + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 - x), $MachinePrecision] + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -1 \lor \neg \left(x \leq 3.8 \cdot 10^{+61}\right):\\
\;\;\;\;\frac{1}{x} + \frac{-1}{x}\\
\mathbf{else}:\\
\;\;\;\;\left(1 - x\right) + \frac{-1}{x}\\
\end{array}
\end{array}
if x < -1 or 3.79999999999999995e61 < x Initial program 54.8%
Taylor expanded in x around inf 53.6%
if -1 < x < 3.79999999999999995e61Initial program 91.8%
Taylor expanded in x around 0 89.0%
neg-mul-189.0%
unsub-neg89.0%
Simplified89.0%
Final simplification72.3%
(FPCore (x) :precision binary64 (if (or (<= x -1.0) (not (<= x 9.5e+87))) (/ (/ 1.0 x) x) (+ (- 1.0 x) (/ -1.0 x))))
double code(double x) {
double tmp;
if ((x <= -1.0) || !(x <= 9.5e+87)) {
tmp = (1.0 / x) / x;
} else {
tmp = (1.0 - x) + (-1.0 / x);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if ((x <= (-1.0d0)) .or. (.not. (x <= 9.5d+87))) then
tmp = (1.0d0 / x) / x
else
tmp = (1.0d0 - x) + ((-1.0d0) / x)
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if ((x <= -1.0) || !(x <= 9.5e+87)) {
tmp = (1.0 / x) / x;
} else {
tmp = (1.0 - x) + (-1.0 / x);
}
return tmp;
}
def code(x): tmp = 0 if (x <= -1.0) or not (x <= 9.5e+87): tmp = (1.0 / x) / x else: tmp = (1.0 - x) + (-1.0 / x) return tmp
function code(x) tmp = 0.0 if ((x <= -1.0) || !(x <= 9.5e+87)) tmp = Float64(Float64(1.0 / x) / x); else tmp = Float64(Float64(1.0 - x) + Float64(-1.0 / x)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if ((x <= -1.0) || ~((x <= 9.5e+87))) tmp = (1.0 / x) / x; else tmp = (1.0 - x) + (-1.0 / x); end tmp_2 = tmp; end
code[x_] := If[Or[LessEqual[x, -1.0], N[Not[LessEqual[x, 9.5e+87]], $MachinePrecision]], N[(N[(1.0 / x), $MachinePrecision] / x), $MachinePrecision], N[(N[(1.0 - x), $MachinePrecision] + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -1 \lor \neg \left(x \leq 9.5 \cdot 10^{+87}\right):\\
\;\;\;\;\frac{\frac{1}{x}}{x}\\
\mathbf{else}:\\
\;\;\;\;\left(1 - x\right) + \frac{-1}{x}\\
\end{array}
\end{array}
if x < -1 or 9.4999999999999992e87 < x Initial program 58.9%
Taylor expanded in x around inf 97.8%
div-inv97.8%
pow-flip99.2%
metadata-eval99.2%
Applied egg-rr99.2%
neg-mul-199.2%
Simplified99.2%
metadata-eval99.2%
pow-sqr98.8%
pow-prod-down97.8%
inv-pow97.8%
metadata-eval97.8%
frac-times98.8%
associate-*l/99.0%
add-sqr-sqrt61.4%
sqrt-unprod85.2%
frac-times85.3%
metadata-eval85.3%
inv-pow85.3%
pow-prod-down85.2%
pow-sqr85.3%
metadata-eval85.3%
sqrt-pow156.9%
metadata-eval56.9%
inv-pow56.9%
div-inv56.9%
Applied egg-rr56.9%
if -1 < x < 9.4999999999999992e87Initial program 86.4%
Taylor expanded in x around 0 83.7%
neg-mul-183.7%
unsub-neg83.7%
Simplified83.7%
Final simplification72.0%
(FPCore (x) :precision binary64 (if (or (<= x -1.0) (not (<= x 1.6))) (/ (/ 1.0 x) x) (+ 1.0 (/ -1.0 x))))
double code(double x) {
double tmp;
if ((x <= -1.0) || !(x <= 1.6)) {
tmp = (1.0 / x) / x;
} else {
tmp = 1.0 + (-1.0 / x);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if ((x <= (-1.0d0)) .or. (.not. (x <= 1.6d0))) then
tmp = (1.0d0 / x) / x
else
tmp = 1.0d0 + ((-1.0d0) / x)
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if ((x <= -1.0) || !(x <= 1.6)) {
tmp = (1.0 / x) / x;
} else {
tmp = 1.0 + (-1.0 / x);
}
return tmp;
}
def code(x): tmp = 0 if (x <= -1.0) or not (x <= 1.6): tmp = (1.0 / x) / x else: tmp = 1.0 + (-1.0 / x) return tmp
function code(x) tmp = 0.0 if ((x <= -1.0) || !(x <= 1.6)) tmp = Float64(Float64(1.0 / x) / x); else tmp = Float64(1.0 + Float64(-1.0 / x)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if ((x <= -1.0) || ~((x <= 1.6))) tmp = (1.0 / x) / x; else tmp = 1.0 + (-1.0 / x); end tmp_2 = tmp; end
code[x_] := If[Or[LessEqual[x, -1.0], N[Not[LessEqual[x, 1.6]], $MachinePrecision]], N[(N[(1.0 / x), $MachinePrecision] / x), $MachinePrecision], N[(1.0 + N[(-1.0 / x), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -1 \lor \neg \left(x \leq 1.6\right):\\
\;\;\;\;\frac{\frac{1}{x}}{x}\\
\mathbf{else}:\\
\;\;\;\;1 + \frac{-1}{x}\\
\end{array}
\end{array}
if x < -1 or 1.6000000000000001 < x Initial program 51.7%
Taylor expanded in x around inf 96.6%
div-inv96.6%
pow-flip97.8%
metadata-eval97.8%
Applied egg-rr97.8%
neg-mul-197.8%
Simplified97.8%
metadata-eval97.8%
pow-sqr97.4%
pow-prod-down96.6%
inv-pow96.6%
metadata-eval96.6%
frac-times97.4%
associate-*l/97.5%
add-sqr-sqrt50.6%
sqrt-unprod70.6%
frac-times70.7%
metadata-eval70.7%
inv-pow70.7%
pow-prod-down70.6%
pow-sqr70.7%
metadata-eval70.7%
sqrt-pow147.3%
metadata-eval47.3%
inv-pow47.3%
div-inv47.3%
Applied egg-rr47.3%
if -1 < x < 1.6000000000000001Initial program 100.0%
Taylor expanded in x around 0 98.7%
div-sub98.7%
*-inverses98.7%
Simplified98.7%
Final simplification71.4%
(FPCore (x) :precision binary64 (/ -1.0 (* x (+ x 1.0))))
double code(double x) {
return -1.0 / (x * (x + 1.0));
}
real(8) function code(x)
real(8), intent (in) :: x
code = (-1.0d0) / (x * (x + 1.0d0))
end function
public static double code(double x) {
return -1.0 / (x * (x + 1.0));
}
def code(x): return -1.0 / (x * (x + 1.0))
function code(x) return Float64(-1.0 / Float64(x * Float64(x + 1.0))) end
function tmp = code(x) tmp = -1.0 / (x * (x + 1.0)); end
code[x_] := N[(-1.0 / N[(x * N[(x + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{-1}{x \cdot \left(x + 1\right)}
\end{array}
Initial program 74.3%
sub-neg74.3%
+-commutative74.3%
distribute-neg-frac74.3%
metadata-eval74.3%
Applied egg-rr74.3%
metadata-eval74.3%
distribute-neg-frac74.3%
unsub-neg74.3%
*-inverses74.3%
associate-/r*51.9%
*-commutative51.9%
associate-/r*74.3%
div-sub74.2%
*-inverses74.2%
div-sub75.8%
associate-/l/75.8%
+-commutative75.8%
associate--r+99.3%
+-inverses99.3%
metadata-eval99.3%
distribute-lft-in99.4%
*-rgt-identity99.4%
unpow299.4%
Simplified99.4%
unpow299.4%
distribute-rgt1-in99.3%
Applied egg-rr99.3%
Final simplification99.3%
(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 74.3%
Taylor expanded in x around 0 48.6%
(FPCore (x) :precision binary64 (- x))
double code(double x) {
return -x;
}
real(8) function code(x)
real(8), intent (in) :: x
code = -x
end function
public static double code(double x) {
return -x;
}
def code(x): return -x
function code(x) return Float64(-x) end
function tmp = code(x) tmp = -x; end
code[x_] := (-x)
\begin{array}{l}
\\
-x
\end{array}
Initial program 74.3%
Taylor expanded in x around 0 47.9%
neg-mul-147.9%
unsub-neg47.9%
Simplified47.9%
Taylor expanded in x around inf 3.4%
neg-mul-13.4%
Simplified3.4%
herbie shell --seed 2024107
(FPCore (x)
:name "2frac (problem 3.3.1)"
:precision binary64
(- (/ 1.0 (+ x 1.0)) (/ 1.0 x)))