
(FPCore (x) :precision binary64 (- (log (- (/ 1.0 x) 1.0))))
double code(double x) {
return -log(((1.0 / x) - 1.0));
}
real(8) function code(x)
real(8), intent (in) :: x
code = -log(((1.0d0 / x) - 1.0d0))
end function
public static double code(double x) {
return -Math.log(((1.0 / x) - 1.0));
}
def code(x): return -math.log(((1.0 / x) - 1.0))
function code(x) return Float64(-log(Float64(Float64(1.0 / x) - 1.0))) end
function tmp = code(x) tmp = -log(((1.0 / x) - 1.0)); end
code[x_] := (-N[Log[N[(N[(1.0 / x), $MachinePrecision] - 1.0), $MachinePrecision]], $MachinePrecision])
\begin{array}{l}
\\
-\log \left(\frac{1}{x} - 1\right)
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 4 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (- (log (- (/ 1.0 x) 1.0))))
double code(double x) {
return -log(((1.0 / x) - 1.0));
}
real(8) function code(x)
real(8), intent (in) :: x
code = -log(((1.0d0 / x) - 1.0d0))
end function
public static double code(double x) {
return -Math.log(((1.0 / x) - 1.0));
}
def code(x): return -math.log(((1.0 / x) - 1.0))
function code(x) return Float64(-log(Float64(Float64(1.0 / x) - 1.0))) end
function tmp = code(x) tmp = -log(((1.0 / x) - 1.0)); end
code[x_] := (-N[Log[N[(N[(1.0 / x), $MachinePrecision] - 1.0), $MachinePrecision]], $MachinePrecision])
\begin{array}{l}
\\
-\log \left(\frac{1}{x} - 1\right)
\end{array}
(FPCore (x) :precision binary64 (- 0.0 (log (+ (/ 1.0 x) -1.0))))
double code(double x) {
return 0.0 - log(((1.0 / x) + -1.0));
}
real(8) function code(x)
real(8), intent (in) :: x
code = 0.0d0 - log(((1.0d0 / x) + (-1.0d0)))
end function
public static double code(double x) {
return 0.0 - Math.log(((1.0 / x) + -1.0));
}
def code(x): return 0.0 - math.log(((1.0 / x) + -1.0))
function code(x) return Float64(0.0 - log(Float64(Float64(1.0 / x) + -1.0))) end
function tmp = code(x) tmp = 0.0 - log(((1.0 / x) + -1.0)); end
code[x_] := N[(0.0 - N[Log[N[(N[(1.0 / x), $MachinePrecision] + -1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0 - \log \left(\frac{1}{x} + -1\right)
\end{array}
Initial program 99.6%
Final simplification99.6%
(FPCore (x) :precision binary64 (+ x (log x)))
double code(double x) {
return x + log(x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = x + log(x)
end function
public static double code(double x) {
return x + Math.log(x);
}
def code(x): return x + math.log(x)
function code(x) return Float64(x + log(x)) end
function tmp = code(x) tmp = x + log(x); end
code[x_] := N[(x + N[Log[x], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \log x
\end{array}
Initial program 99.6%
Taylor expanded in x around 0
sub-negN/A
mul-1-negN/A
remove-double-negN/A
+-lowering-+.f64N/A
log-lowering-log.f6499.3%
Simplified99.3%
(FPCore (x) :precision binary64 (log x))
double code(double x) {
return log(x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = log(x)
end function
public static double code(double x) {
return Math.log(x);
}
def code(x): return math.log(x)
function code(x) return log(x) end
function tmp = code(x) tmp = log(x); end
code[x_] := N[Log[x], $MachinePrecision]
\begin{array}{l}
\\
\log x
\end{array}
Initial program 99.6%
Taylor expanded in x around 0
log-lowering-log.f6498.6%
Simplified98.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 x end
function tmp = code(x) tmp = x; end
code[x_] := x
\begin{array}{l}
\\
x
\end{array}
Initial program 99.6%
Taylor expanded in x around 0
sub-negN/A
mul-1-negN/A
remove-double-negN/A
+-lowering-+.f64N/A
log-lowering-log.f6499.3%
Simplified99.3%
Taylor expanded in x around inf
Simplified2.3%
herbie shell --seed 2024161
(FPCore (x)
:name "neg log"
:precision binary64
(- (log (- (/ 1.0 x) 1.0))))