
(FPCore (x) :precision binary64 (atanh x))
double code(double x) {
return atanh(x);
}
def code(x): return math.atanh(x)
function code(x) return atanh(x) end
function tmp = code(x) tmp = atanh(x); end
code[x_] := N[ArcTanh[x], $MachinePrecision]
\begin{array}{l}
\\
\tanh^{-1} x
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 3 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (* 0.5 (log1p (/ (* 2.0 x) (- 1.0 x)))))
double code(double x) {
return 0.5 * log1p(((2.0 * x) / (1.0 - x)));
}
public static double code(double x) {
return 0.5 * Math.log1p(((2.0 * x) / (1.0 - x)));
}
def code(x): return 0.5 * math.log1p(((2.0 * x) / (1.0 - x)))
function code(x) return Float64(0.5 * log1p(Float64(Float64(2.0 * x) / Float64(1.0 - x)))) end
code[x_] := N[(0.5 * N[Log[1 + N[(N[(2.0 * x), $MachinePrecision] / N[(1.0 - x), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot \mathsf{log1p}\left(\frac{2 \cdot x}{1 - x}\right)
\end{array}
(FPCore (x) :precision binary64 (* 0.5 (log1p (/ (* 2.0 x) (- 1.0 x)))))
double code(double x) {
return 0.5 * log1p(((2.0 * x) / (1.0 - x)));
}
public static double code(double x) {
return 0.5 * Math.log1p(((2.0 * x) / (1.0 - x)));
}
def code(x): return 0.5 * math.log1p(((2.0 * x) / (1.0 - x)))
function code(x) return Float64(0.5 * log1p(Float64(Float64(2.0 * x) / Float64(1.0 - x)))) end
code[x_] := N[(0.5 * N[Log[1 + N[(N[(2.0 * x), $MachinePrecision] / N[(1.0 - x), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot \mathsf{log1p}\left(\frac{2 \cdot x}{1 - x}\right)
\end{array}
Initial program 99.9%
Final simplification99.9%
(FPCore (x) :precision binary64 (* 0.5 (log1p (* x (/ 2.0 (- 1.0 x))))))
double code(double x) {
return 0.5 * log1p((x * (2.0 / (1.0 - x))));
}
public static double code(double x) {
return 0.5 * Math.log1p((x * (2.0 / (1.0 - x))));
}
def code(x): return 0.5 * math.log1p((x * (2.0 / (1.0 - x))))
function code(x) return Float64(0.5 * log1p(Float64(x * Float64(2.0 / Float64(1.0 - x))))) end
code[x_] := N[(0.5 * N[Log[1 + N[(x * N[(2.0 / N[(1.0 - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot \mathsf{log1p}\left(x \cdot \frac{2}{1 - x}\right)
\end{array}
Initial program 99.9%
*-commutative99.9%
associate-/l*99.9%
Simplified99.9%
Final simplification99.9%
(FPCore (x) :precision binary64 (* 0.5 (* 2.0 x)))
double code(double x) {
return 0.5 * (2.0 * x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = 0.5d0 * (2.0d0 * x)
end function
public static double code(double x) {
return 0.5 * (2.0 * x);
}
def code(x): return 0.5 * (2.0 * x)
function code(x) return Float64(0.5 * Float64(2.0 * x)) end
function tmp = code(x) tmp = 0.5 * (2.0 * x); end
code[x_] := N[(0.5 * N[(2.0 * x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot \left(2 \cdot x\right)
\end{array}
Initial program 99.9%
*-commutative99.9%
associate-/l*99.9%
Simplified99.9%
Taylor expanded in x around 0 98.6%
Final simplification98.6%
herbie shell --seed 2024079
(FPCore (x)
:name "Rust f64::atanh"
:precision binary64
(* 0.5 (log1p (/ (* 2.0 x) (- 1.0 x)))))