
(FPCore (x) :precision binary64 (/ (exp x) (- (exp x) 1.0)))
double code(double x) {
return exp(x) / (exp(x) - 1.0);
}
real(8) function code(x)
real(8), intent (in) :: x
code = exp(x) / (exp(x) - 1.0d0)
end function
public static double code(double x) {
return Math.exp(x) / (Math.exp(x) - 1.0);
}
def code(x): return math.exp(x) / (math.exp(x) - 1.0)
function code(x) return Float64(exp(x) / Float64(exp(x) - 1.0)) end
function tmp = code(x) tmp = exp(x) / (exp(x) - 1.0); end
code[x_] := N[(N[Exp[x], $MachinePrecision] / N[(N[Exp[x], $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{e^{x}}{e^{x} - 1}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 8 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (/ (exp x) (- (exp x) 1.0)))
double code(double x) {
return exp(x) / (exp(x) - 1.0);
}
real(8) function code(x)
real(8), intent (in) :: x
code = exp(x) / (exp(x) - 1.0d0)
end function
public static double code(double x) {
return Math.exp(x) / (Math.exp(x) - 1.0);
}
def code(x): return math.exp(x) / (math.exp(x) - 1.0)
function code(x) return Float64(exp(x) / Float64(exp(x) - 1.0)) end
function tmp = code(x) tmp = exp(x) / (exp(x) - 1.0); end
code[x_] := N[(N[Exp[x], $MachinePrecision] / N[(N[Exp[x], $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{e^{x}}{e^{x} - 1}
\end{array}
(FPCore (x) :precision binary64 (/ -1.0 (expm1 (- x))))
double code(double x) {
return -1.0 / expm1(-x);
}
public static double code(double x) {
return -1.0 / Math.expm1(-x);
}
def code(x): return -1.0 / math.expm1(-x)
function code(x) return Float64(-1.0 / expm1(Float64(-x))) end
code[x_] := N[(-1.0 / N[(Exp[(-x)] - 1), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{-1}{\mathsf{expm1}\left(-x\right)}
\end{array}
Initial program 35.7%
sub-neg35.7%
+-commutative35.7%
rgt-mult-inverse3.7%
exp-neg3.8%
distribute-rgt-neg-out3.8%
*-rgt-identity3.8%
distribute-lft-in3.8%
neg-sub03.8%
associate-+l-3.8%
neg-sub03.2%
associate-/r*3.2%
*-rgt-identity3.2%
associate-*r/3.2%
rgt-mult-inverse35.3%
distribute-frac-neg235.3%
distribute-neg-frac35.3%
metadata-eval35.3%
expm1-define100.0%
Simplified100.0%
(FPCore (x) :precision binary64 (- (+ (/ 1.0 x) 0.5) (* x -0.08333333333333333)))
double code(double x) {
return ((1.0 / x) + 0.5) - (x * -0.08333333333333333);
}
real(8) function code(x)
real(8), intent (in) :: x
code = ((1.0d0 / x) + 0.5d0) - (x * (-0.08333333333333333d0))
end function
public static double code(double x) {
return ((1.0 / x) + 0.5) - (x * -0.08333333333333333);
}
def code(x): return ((1.0 / x) + 0.5) - (x * -0.08333333333333333)
function code(x) return Float64(Float64(Float64(1.0 / x) + 0.5) - Float64(x * -0.08333333333333333)) end
function tmp = code(x) tmp = ((1.0 / x) + 0.5) - (x * -0.08333333333333333); end
code[x_] := N[(N[(N[(1.0 / x), $MachinePrecision] + 0.5), $MachinePrecision] - N[(x * -0.08333333333333333), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(\frac{1}{x} + 0.5\right) - x \cdot -0.08333333333333333
\end{array}
Initial program 35.7%
sub-neg35.7%
+-commutative35.7%
rgt-mult-inverse3.7%
exp-neg3.8%
distribute-rgt-neg-out3.8%
*-rgt-identity3.8%
distribute-lft-in3.8%
neg-sub03.8%
associate-+l-3.8%
neg-sub03.2%
associate-/r*3.2%
*-rgt-identity3.2%
associate-*r/3.2%
rgt-mult-inverse35.3%
distribute-frac-neg235.3%
distribute-neg-frac35.3%
metadata-eval35.3%
expm1-define100.0%
Simplified100.0%
Taylor expanded in x around 0 68.6%
Taylor expanded in x around -inf 40.4%
mul-1-neg40.4%
distribute-rgt-neg-in40.4%
sub-neg40.4%
metadata-eval40.4%
+-commutative40.4%
distribute-neg-in40.4%
metadata-eval40.4%
mul-1-neg40.4%
remove-double-neg40.4%
+-commutative40.4%
Simplified40.4%
distribute-lft-in40.4%
flip-+38.1%
Applied egg-rr38.1%
Taylor expanded in x around -inf 40.4%
associate-*r*40.4%
neg-mul-140.4%
sub-neg40.4%
distribute-lft-in40.4%
Simplified68.7%
Final simplification68.7%
(FPCore (x) :precision binary64 (/ 1.0 (/ 1.0 (+ (/ 1.0 x) 0.5))))
double code(double x) {
return 1.0 / (1.0 / ((1.0 / x) + 0.5));
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 / (1.0d0 / ((1.0d0 / x) + 0.5d0))
end function
public static double code(double x) {
return 1.0 / (1.0 / ((1.0 / x) + 0.5));
}
def code(x): return 1.0 / (1.0 / ((1.0 / x) + 0.5))
function code(x) return Float64(1.0 / Float64(1.0 / Float64(Float64(1.0 / x) + 0.5))) end
function tmp = code(x) tmp = 1.0 / (1.0 / ((1.0 / x) + 0.5)); end
code[x_] := N[(1.0 / N[(1.0 / N[(N[(1.0 / x), $MachinePrecision] + 0.5), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{\frac{1}{\frac{1}{x} + 0.5}}
\end{array}
Initial program 35.7%
sub-neg35.7%
+-commutative35.7%
rgt-mult-inverse3.7%
exp-neg3.8%
distribute-rgt-neg-out3.8%
*-rgt-identity3.8%
distribute-lft-in3.8%
neg-sub03.8%
associate-+l-3.8%
neg-sub03.2%
associate-/r*3.2%
*-rgt-identity3.2%
associate-*r/3.2%
rgt-mult-inverse35.3%
distribute-frac-neg235.3%
distribute-neg-frac35.3%
metadata-eval35.3%
expm1-define100.0%
Simplified100.0%
Taylor expanded in x around 0 68.6%
Taylor expanded in x around 0 68.6%
+-commutative68.6%
*-commutative68.6%
fma-undefine68.6%
*-lft-identity68.6%
associate-*l/68.6%
fma-undefine68.6%
distribute-lft-in68.6%
*-commutative68.6%
associate-*l*68.6%
*-commutative68.6%
associate-*l*68.6%
lft-mult-inverse68.6%
metadata-eval68.6%
*-rgt-identity68.6%
+-commutative68.6%
Simplified68.6%
+-commutative68.6%
flip-+40.3%
metadata-eval40.3%
inv-pow40.3%
inv-pow40.3%
pow-prod-up40.1%
metadata-eval40.1%
Applied egg-rr40.1%
clear-num40.2%
clear-num40.1%
metadata-eval40.1%
metadata-eval40.1%
pow-prod-up40.3%
inv-pow40.3%
inv-pow40.3%
flip-+68.6%
Applied egg-rr68.6%
Final simplification68.6%
(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(Float64(1.0 / x) + 0.5) end
function tmp = code(x) tmp = (1.0 / x) + 0.5; end
code[x_] := N[(N[(1.0 / x), $MachinePrecision] + 0.5), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{x} + 0.5
\end{array}
Initial program 35.7%
sub-neg35.7%
+-commutative35.7%
rgt-mult-inverse3.7%
exp-neg3.8%
distribute-rgt-neg-out3.8%
*-rgt-identity3.8%
distribute-lft-in3.8%
neg-sub03.8%
associate-+l-3.8%
neg-sub03.2%
associate-/r*3.2%
*-rgt-identity3.2%
associate-*r/3.2%
rgt-mult-inverse35.3%
distribute-frac-neg235.3%
distribute-neg-frac35.3%
metadata-eval35.3%
expm1-define100.0%
Simplified100.0%
Taylor expanded in x around 0 68.6%
Taylor expanded in x around 0 68.6%
+-commutative68.6%
*-commutative68.6%
fma-undefine68.6%
*-lft-identity68.6%
associate-*l/68.6%
fma-undefine68.6%
distribute-lft-in68.6%
*-commutative68.6%
associate-*l*68.6%
*-commutative68.6%
associate-*l*68.6%
lft-mult-inverse68.6%
metadata-eval68.6%
*-rgt-identity68.6%
+-commutative68.6%
Simplified68.6%
(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 35.7%
sub-neg35.7%
+-commutative35.7%
rgt-mult-inverse3.7%
exp-neg3.8%
distribute-rgt-neg-out3.8%
*-rgt-identity3.8%
distribute-lft-in3.8%
neg-sub03.8%
associate-+l-3.8%
neg-sub03.2%
associate-/r*3.2%
*-rgt-identity3.2%
associate-*r/3.2%
rgt-mult-inverse35.3%
distribute-frac-neg235.3%
distribute-neg-frac35.3%
metadata-eval35.3%
expm1-define100.0%
Simplified100.0%
Taylor expanded in x around 0 68.6%
(FPCore (x) :precision binary64 1.0)
double code(double x) {
return 1.0;
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0
end function
public static double code(double x) {
return 1.0;
}
def code(x): return 1.0
function code(x) return 1.0 end
function tmp = code(x) tmp = 1.0; end
code[x_] := 1.0
\begin{array}{l}
\\
1
\end{array}
Initial program 35.7%
sub-neg35.7%
+-commutative35.7%
rgt-mult-inverse3.7%
exp-neg3.8%
distribute-rgt-neg-out3.8%
*-rgt-identity3.8%
distribute-lft-in3.8%
neg-sub03.8%
associate-+l-3.8%
neg-sub03.2%
associate-/r*3.2%
*-rgt-identity3.2%
associate-*r/3.2%
rgt-mult-inverse35.3%
distribute-frac-neg235.3%
distribute-neg-frac35.3%
metadata-eval35.3%
expm1-define100.0%
Simplified100.0%
Applied egg-rr2.0%
*-inverses3.3%
Simplified3.3%
(FPCore (x) :precision binary64 0.5)
double code(double x) {
return 0.5;
}
real(8) function code(x)
real(8), intent (in) :: x
code = 0.5d0
end function
public static double code(double x) {
return 0.5;
}
def code(x): return 0.5
function code(x) return 0.5 end
function tmp = code(x) tmp = 0.5; end
code[x_] := 0.5
\begin{array}{l}
\\
0.5
\end{array}
Initial program 35.7%
sub-neg35.7%
+-commutative35.7%
rgt-mult-inverse3.7%
exp-neg3.8%
distribute-rgt-neg-out3.8%
*-rgt-identity3.8%
distribute-lft-in3.8%
neg-sub03.8%
associate-+l-3.8%
neg-sub03.2%
associate-/r*3.2%
*-rgt-identity3.2%
associate-*r/3.2%
rgt-mult-inverse35.3%
distribute-frac-neg235.3%
distribute-neg-frac35.3%
metadata-eval35.3%
expm1-define100.0%
Simplified100.0%
Taylor expanded in x around 0 68.6%
Taylor expanded in x around inf 3.3%
(FPCore (x) :precision binary64 -1.0)
double code(double x) {
return -1.0;
}
real(8) function code(x)
real(8), intent (in) :: x
code = -1.0d0
end function
public static double code(double x) {
return -1.0;
}
def code(x): return -1.0
function code(x) return -1.0 end
function tmp = code(x) tmp = -1.0; end
code[x_] := -1.0
\begin{array}{l}
\\
-1
\end{array}
Initial program 35.7%
sub-neg35.7%
+-commutative35.7%
rgt-mult-inverse3.7%
exp-neg3.8%
distribute-rgt-neg-out3.8%
*-rgt-identity3.8%
distribute-lft-in3.8%
neg-sub03.8%
associate-+l-3.8%
neg-sub03.2%
associate-/r*3.2%
*-rgt-identity3.2%
associate-*r/3.2%
rgt-mult-inverse35.3%
distribute-frac-neg235.3%
distribute-neg-frac35.3%
metadata-eval35.3%
expm1-define100.0%
Simplified100.0%
Applied egg-rr0.4%
unpow-10.4%
distribute-frac-neg20.4%
distribute-rgt-neg-out0.4%
rgt-mult-inverse3.1%
metadata-eval3.1%
Simplified3.1%
(FPCore (x) :precision binary64 (/ (- 1.0) (expm1 (- x))))
double code(double x) {
return -1.0 / expm1(-x);
}
public static double code(double x) {
return -1.0 / Math.expm1(-x);
}
def code(x): return -1.0 / math.expm1(-x)
function code(x) return Float64(Float64(-1.0) / expm1(Float64(-x))) end
code[x_] := N[((-1.0) / N[(Exp[(-x)] - 1), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{-1}{\mathsf{expm1}\left(-x\right)}
\end{array}
herbie shell --seed 2024095
(FPCore (x)
:name "expq2 (section 3.11)"
:precision binary64
:pre (> 710.0 x)
:alt
(/ (- 1.0) (expm1 (- x)))
(/ (exp x) (- (exp x) 1.0)))